投稿者 大池  (社会人) 投稿日時 2010/7/9 15:12:17
いつもご指導をいただきありがとうございます。
XPでvb2008を勉強をしています。
MDI親ホームからMDI子ホームのコンボボックスに文字を挿入するために次のようなテストをしています。
MDI子ホームにPanel1、ComboBox1を張り付けましてMDI親ホームからつぎの操作をし、
一応期待通りの結果がでました。しかし、あまりにも回りくどいですが、これでいいのでしょうか?
他に例えばMy.???のような簡単な方法があるのではと期待しながらお尋ねする次第です。
それからPanel1の中に張り付けたコントロールを取得するにはどのようにすればいいのでしょうか?
ご教授のほどよろしくお願いいたします。

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    
        Dim actChild As Form = ActiveMdiChild
        For i As Integer = 0 To actChild.Controls.Count - 1
            'Debug.Print(i.ToString)
            Select Case actChild.Controls.Item(i).Name
                Case "Panel1"
                    Dim pnl As Panel = ActiveMdiChild.Controls(i)
                    pnl.Enabled = True
                Case "ComboBox1"
                    Dim cbo0 As ComboBox = ActiveMdiChild.Controls(i)
                    cbo0.Text = "2010"
             End Select
        Next
     End Sub