tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルコントロール配列について
記事No1045
投稿日: 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 ←実行時、ここでエラーになってしまいます。コーディングは問題ないの

すが・・・

[ツリー表示へ]
タイトルRe: コントロール配列について
記事No1046
投稿日: 2004/08/21(Sat) 18:35
投稿者花ちゃん
>←実行時、ここでエラーになってしまいます。コーディングは問題ないのですが・・・

問題があるから、エラー表示されるのでは。 問題がなければ動作するはずです。

前画面の処理 - くいな 08/12-12:06 No.1022 の一連のスレッドや
ここの[フォーム]の.NET のTips は参考になりませんか?

# 変数名やプロシージャ名に全角文字(漢字等)は使用しない方がいいかと思います。

[ツリー表示へ]
タイトルRe^2: コントロール配列について
記事No1047
投稿日: 2004/08/23(Mon) 09:43
投稿者としくん
[OSのVer]:Windows    [VBのVer]:VB.NET  
> 前画面の処理 - くいな 08/12-12:06 No.1022 の一連のスレッドや
> ここの[フォーム]の.NET のTips は参考になりませんか?
花ちゃんレスあちがとうございました。
早速前画面の処理を参考に対応する事ができました。コントロール配列だから
というわけではなかったんですね。

勉強不足な私ですが今後とも宜しくお願いいたします。

[ツリー表示へ]