'mMain.vb
Module mMain
Public f1 As New Form1()
Public f2 As New Form2()
Sub Main()
Application.Run(f1)
End Sub
End Module
'Form1.vb
Class Form1
... ' VB自动生成代码,略
Friend Label1 As Label '拖上去的控件,自动生成的代码。
Friend Button1 As Button '拖上去的控件,自动生成的代码。
... ' VB自动生成代码,略
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Debug.WriteLine(f2.Label1_Text)
f2.Label1_Text = "Changed By Form1"
Debug.WriteLine(f2.Label1.Text) ' 注意看这句,和上面那句不一样。
' 但是提醒您,请慎用。
End Sub
Public Property Label1_Text As String
Get
Return Label1.Text
End Get
Set (Value As String)
Label1.Text = Value
End Set
End Property
End Class
'Form2.vb
Class Form2
... ' VB自动生成代码,略
Friend Label1 As Label '拖上去的控件,自动生成的代码。
Friend Button1 As Button '拖上去的控件,自动生成的代码。
... ' VB自动生成代码,略
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Debug.WriteLine(f1.Label1_Text)
f1.Label1_Text = "Changed By Form2"
Debug.WriteLine(f1.Label1.Text) ' 注意看这句,和上面那句不一样。
' 但是提醒您,请慎用。
End Sub
Public Property Label1_Text As String
Get
Return Label1.Text
End Get
Set (Value As String)
Label1.Text = Value
End Set
End Property
End Class
1
Dim A as New CClass和Dim A as New CClass()有什么区别?
我有时候New的时候没有()就不行,带上()就可以,那个类的构造函数
根本不要什么参数........
2
我要的就是2个窗体对象之间如何进行通讯,我的2个解决方法
(1)用公用变量,把要的公用变量封装在一个类里面,在Sub Main里面
New一个对象,然后就可以用了
(2)窗体间的事件传递对相互的控件进行操作.
这么没有人说个好点方法啊?.......