nakaPさん、トマトさん返答ありがとうございます
こういう方法が、有るんですね、ありがとうございます。

＞フォームは同じフォームを、複数表示させたいので
＞Form1_Loadの、外で　dim b as new form2
＞と、
＞宣言すると、一つしか出ないのですが解決策ないですか？ 

MDIFormみたいなことがしたいのでしょうか。
同一のものを複数利用したい場合は配列を使います。
クラス変数(Form_Loadなどのプロシジャ外で宣言した変数)の場合はDimステートメントではなくPrivateステートメントを利用したほうが良いです。
クラス変数の場合は、利用する直前にインスタンスの生成(New)をしたほうが良いです。

以上をまとめると以下のような感じ。

Public Class Form1

    Private f(2) As Form2



    Private Sub Button1_Click(Byval sender As Object, Byval e As System.EventArgs) Handles Button1.Click

        f(0) = New Form2()

        f.TopLebel = False

        Me.Controls.Add(f(0))

        f(0).Show()

    End Sub



    Private Sub Button2_Click(Byval sender As Object, Byval e As System.EventArgs) Handles Button2.Click

        f(1) = New Form2()

        f.TopLebel = False

        Me.Controls.Add(f(1))

        f(1).Show()

    End Sub



    Private Sub Button3_Click(Byval sender As Object, Byval e As System.EventArgs) Handles Button3.Click

        f(2) = New Form2()

        f.TopLebel = False

        Me.Controls.Add(f(2))

        f(2).Show()

    End Sub

End Class

手書きなので細かいところは間違ってるかも。

nakaPさん、ご指摘ありがとうございます
後者ですね・・・
語弊を生むようなタイトルで、申し訳ございませんorz

こんにちは。

＞Form1_Loadで、定義したボタン・フォームを、Button1_clickなどの、別のプロシージャで操作するにはどうすればいいですか？

この質問は、

＞Form1_Loadで、定義したボタン・フォームで、Button1_clickなどのイベントを発生させるのにはどうすればいいですか？

と、

＞Form1_Loadで、定義したボタン・フォームを、元々用意されているButton1_clickなどの、別のコントロールのイベントプロシージャで操作するにはどうすればいいですか？

の２通りの捉え方ができます。
前者ならAddHandlerで紐付け、後者ならプロシージャ変数をクラス変数にすれば解決できます。

わかりにくくてすいませんでした。
＞番号って、何でしょうか？
追加した順番のことです。
Controlsプロパティはコレクションなので、ほぼArrayListと同じような使い方ができます。

Dim list As New ArrayList

MsgBox(list(0)) '0番の内容が表示される。 

　　　　　↓

MsgBox(Me.Controls(0).Text) 'フォームのコントロール0番のTextプロパティを表示 

というように使えます。

＞＞確か、iをString型にしてコントロールのNameプロパティの値にしても行くと思います。
　　とは、こういう事なのでしょうか？

そうです。詳しくはhttp://homepage1.nifty.com/rucio/main/dotnet/shokyu/standard20.htmで。

＞一つしか出ないのですが解決策ないですか？
？？？？？？？？？？？？？？？？？？？？？？？

コード未検証ですが、こんなのはどうでしょう。
ControlのNameプロパティを設定して、Ctypeで動かす。

Private Sub Button1_Click(....)

   Dim c As New Label

   c.Name = "Label1"

   Me.Controls.Add(c)

End Sub



Private Sub Button2_Click(....)

   Ctype("Label1" , Label).Text = "新しいLabel"

End Sub

こんなもんでいかがでしょうか。

迅速な返答ありがとうございます。

Private Sub Button1_Click(sender As Object, e As EventArgs)
    Dim i As Integer = 番号
    Dim o = Me.Controls(i) 'VB2008でない場合はControl型で 
    '↓処理を書く 

End Sub
の番号って、何でしょうか？

＞確か、iをString型にしてコントロールのNameプロパティの値にしても行くと思います。
とは、こういう事なのでしょうか？
Dim i As String = a.Name
        Dim o = Me.Controls(i)
        If o.Visible = True Then
            o.Visible = False
        Else
            o.Visible = True
        End If

それと、フォームは同じフォームを、複数表示させたいので
Form1_Loadの、外で　dim b as new form2
と、
宣言すると、一つしか出ないのですが解決策ないですか？

Form1のControlsコレクションに追加したのだから

Private Sub Button1_Click(sender As Object, e As EventArgs)

    Dim i As Integer = 番号

    Dim o = Me.Controls(i) 'VB2008でない場合はControl型で 

    '↓処理を書く 



End Sub

確か、iをString型にしてコントロールのNameプロパティの値にしても行くと思います。

もう１つ

Public Class Form1

    Dim a As New Button

    Dim b As New Form2

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Me.Controls.Add(a)

        b.Toplevel = False

        Me.Controls.Add(b)

        b.Show()

    End Sub

こんばんわ、winvisといいます。
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
dim a as new button
dim b as new form2
me.controls.add(a)
b.toplevel = false
me.controls.add(b)
b.show
end sub

Form1_Loadで、定義したボタン・フォームを、Button1_clickなどの、別のプロシージャで操作するにはどうすればいいですか？

操作する内容
ボタンの場合
form2のボタンを、controls.removeで、削除する
フォームの場合
最大化・最小化する