
No.3ベストアンサー
- 回答日時:
すでに回答が出ていますが「Form2に手を加えない(あるいは加えることが出来ない場合の)」方法を。
※Form2のボタン(Button1)がFriend(またはPublic)で生成されていることが前提です。
方法1:Form1側でForm2のButton1をWithEvent宣言した変数に格納する
[ Form1内 ]
Private WithEvents btnForm2 As Windows.Forms.Button
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim frmNew As New Form2
btnForm2 = frmNew.Button1
frmNew.Show()
End Sub
Private Sub btnForm2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnForm2.Click
Windows.Forms.MessageBox.Show("クリック♪")
End Sub
Private Sub btnForm2_Disposed(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnForm2.Disposed
' 後始末
btnForm2 = Nothing
End Sub
ただし、この方法では、ボタンを1つしか制御できません。Form2を複数生成する場合は、イベントハンドラを使う方法があります。
方法2:イベントハンドラを手動で追加・削除する
[ Form1内 ]
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim frmNew As New Form2
'* インテリセンスではButton1が出てきませんが、手書きすれば大丈夫です。
AddHandler frmNew.Button1.Click, AddressOf Form2_Button1_Click
AddHandler frmNew.Button1.Disposed, AddressOf Form2_Button1_Disposed
frmNew.Show()
End Sub
Private Sub Form2_Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
Windows.Forms.MessageBox.Show("クリック♪")
End Sub
Private Sub Form2_Button1_Disposed(ByVal sender As Object, ByVal e As System.EventArgs)
' 後始末
Dim btnSender As Windows.Forms.Button = CType(sender, Windows.Forms.Button)
RemoveHandler btnSender.Click, AddressOf Form2_Button1_Click
RemoveHandler btnSender.Disposed, AddressOf Form2_Button1_Disposed
End Sub
No.2
- 回答日時:
フォームをたくさん使う必要があるのかどうか、よく検討したほうがいいですよ。
1枚のフォームで十分な場合が多そうですけど。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
他のフォームから別のフォームのサブルーチンを呼び出す
Visual Basic(VBA)
-
VB.NETでのイベントの途中終了
Visual Basic(VBA)
-
FORMが開いているかどうかの確認方法
Visual Basic(VBA)
-
-
4
【VB】タブ切り替え時のイベント
Visual Basic(VBA)
-
5
別フォームから戻ったときのイベント
Visual Basic(VBA)
-
6
Hideについて(.NET)
Visual Basic(VBA)
-
7
別のフォームで記述している関数を実行するには?C#
C言語・C++・C#
-
8
DataGrdViewに関連付けたデータの更新
C言語・C++・C#
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBAでオプションボタンによって...
-
VBA(エクセル)で自動的にボタン...
-
VBA CommandButtonの文字ずれ
-
Access VBA でデータペーストを...
-
コマンドボタンやイメージにマ...
-
ユーザーフォームに別シートか...
-
VB.net でトグルボタンを実現し...
-
Excel マクロ 閉じるボタン
-
C#プログラムで、ボタンをショ...
-
[VB.net] ボタン(Flat)のEnable...
-
ボタンの枠線の様なものを消したい
-
セルをマクロのボタンにしたい。
-
他のアプリケーションとの連携
-
グラフィカルボタン
-
Showメソッド
-
VBAで多数のプログラムを一つの...
-
[Excel VBA]コマンドボタンの入...
-
TextBoxでEnterキーを押すと、...
-
【vb2005】 動的に作成されたCo...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBA(エクセル)で自動的にボタン...
-
ユーザーフォームに別シートか...
-
VBAで多数のプログラムを一つの...
-
Excel VBA Application.caller...
-
VBA CommandButtonの文字ずれ
-
コマンドボタンやイメージにマ...
-
C#プログラムで、ボタンをショ...
-
BorlandC++Builderでのタイマー...
-
[VB.net] ボタン(Flat)のEnable...
-
フォームの再読み込み
-
ボタンをマウスで押し続けたと...
-
閉じると「+」になり開くと「-...
-
Access VBA でデータペーストを...
-
C#でSendInputを使ったサンプル...
-
バックスペース機能の作り方
-
アイコンとボタンの違い
-
セルをマクロのボタンにしたい。
-
Excel マクロ 閉じるボタン
-
VBAのボタンの位置が変わって困...
おすすめ情報