| タイトル | ： フォーム間の変数の受け渡し |
| 記事No | ： 2392 |
| 投稿日 | ： 2005/10/11(Tue) 19:31 |
| 投稿者 | ： raly pop |
[OSのVer]：Windows2000 [VBのVer]：VB.NET
他サイト、過去ログ等読んでいろいろ試しているのですが、停滞中なので、質問です。
form1のボタンを押すと、form2が開き、
同時にform1で宣言した変数に値が入るようになっています。
この変数をform2で使いたいのですが、うまくいきません。
ご教授願います。以下プログラム
---------------------------------------------------------------------------------------
form1
Public Class Form1
Inherits System.Windows.Forms.Form
Windows フォーム デザイナで生成されたコード
Public aaa As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button1.Click
aaa = 1
Dim callform2 As New Form2
Me.Hide()
Try
callform2.ShowDialog()
Finally
If Not callform2 Is Nothing Then
callform2.Dispose()
Me.Close()
End If
End Try
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button2.Click
aaa = 2
Dim callform2 As New Form2
Me.Hide()
Try
callform2.ShowDialog()
Finally
If Not callform2 Is Nothing Then
callform2.Dispose()
Me.Close()
End If
End Try
End Sub
End Class
------------------------------------------------------------------------------------------
form2
Public Class Form2
Inherits System.Windows.Forms.Form
Windows フォーム デザイナで生成されたコード
Public callform1 As Form1
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button3.Click
callform1=New Form1
Dim bbb As Integer
bbb = callform1aaa
Dim callform5 As New Form5
Dim callform31 As New Form31
If bbb = 1 Then
callform5.ShowDialog()
ElseIf bbb = 2 Then
callform31.ShowDialog()
End If
|