タイトル | : コントロール配列について |
記事No | : 1045 |
投稿日 | : 2004/08/21(Sat) 11:53 |
投稿者 | : としくん |
[OSのVer]:Windows2000SP4 [VBのVer]:VB.NET2003
いつもお世話になります。 親フォームへコントロール配列を下記の様に設定しました。 それに対してて子フォームからtxt品名(1)の値を参照するにはどうすれば よいでしょうか? ご指導のほどよろしくお願いいたします。
-----親フォームのソースの一部です----- Public txt品名(3) As System.Windows.Forms.TextBox Public oPROC01 As New frmPROC1
Private Sub frmPROC01_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Call lsSetコントロール配列() End Sub
Private Sub lsSetコントロール配列() Dim i As Integer
' インスタンスを代入 txt品名(1) = txt品名01 txt品名(2) = txt品名02 txt品名(3) = txt品名03
' イベントハンドラに関連付け For i = 1 To 3 AddHandler txt品名(i).GotFocus, AddressOf txt品名_GotFocus Next i
End Sub
Private Sub txt品名_GotFocus(ByVal sender As Object, ByVal e As EventArgs) gObjectIndex = CInt(sender.Tag) gTableName = "M_品名" End Sub
-----子フォームの参照する際のソースです----- oPROC01.txt品名(1).Text ←実行時、ここでエラーになってしまいます。コーディングは問題ないの で すが・・・
|