| 分類:[.NET 全般]
初めまして、今悩んでて助言をください
開発言語Vb.net windows Forms
’変数の意味、宣言等は割愛
Form1側 Private Sub Inspection_form() Dim inpe As New Inspection_form.Main inpe.finishedproduct = finishedproduct inpe.Rec = TextBox1.Text inpe.pass_2 = pass inpe.Log_List = log inpe.My_Config = My_system_F inpe.My_Use = My_system_U
check_form = New Inspection_form check_form.Show(Inte_use)
Form2側 Public Structure Main_Recive Public finishedproduct As String() Public Rec As String Public Log_List As ListBox Public pass_2 As String() Public My_Config As String Public My_Use As String End Structure
Public Overloads Sub show(Main_Recive As Main_470) proda_name.Text = Main_Recive.Rec
'ボタン B = New Button() {Check_bt, stop_bt, Call_bt, end_bt} Dim n As String() = File.ReadAllLines(Main_Recive.My_Config & Main_Recive.pass_2(5), enco) B(0).Text = n(7) B(1).Text = n(8) B(2).Text = n(9) B(3).Text = n(10) 'ラベル L = New Label() {Cut_timer} Dim n2 As String() = File.ReadAllLines(Main_Recive.My_Config & Main_Recive.pass_2(6), enco) For i As Integer = 0 To L.Length - 1 L(i).Text = n2(i) Next 'PDF Load時 Dim s As Integer = Array.IndexOf(Main_Recive.finishedproduct, proda_name.Text) Dim a As String() = Directory.GetFiles(Main_Recive.My_Use & "\" & Main_Recive.finishedproduct(s)) PDF.LoadFile(a(0))
show()
1側の変数には配列なり、コントロールなりを設定 showしたときに引数を使いForm2呼び出し時の表示はできたのですが
Form2側でのボタンイベントでの引数が上手くいきません
Private Sub next_Cl_Click(sender As Object, e As EventArgs) Handles next_Cl.Click Dim rec As New Main_470 next_pro(rec) End Sub
’クリックイベントでnext_proプロシージャーを呼び出し、構造体の引数付 Private Sub next_pro(c As Main_470) Dim i As Integer = Array.IndexOf(c.finishedproduct, proda_name.Text) Dim a As String() = Directory.GetFiles(c.My_Use & c.finishedproduct(i)) number = number + 1 PDF.LoadFile(a(number)) End Sub
クリックイベントで構造体の型をNewしなければ引数として使えないので インスタンスしますが初期化するので 保持出きていないので、Nothingなります
構造体の使いたが間違っているのか? 最近構造体をやり始めてていまいち理解できてないのか 詳しく教えてください。
|