1、bas中定义全局 变量 2、也可以用下面的方法 '在form1中 Public a1 As Integer Private Sub Form_Load() a1 = 111 End Sub Private Sub Command1_Click() Print a1 Print Form1.a1 Print Form2.b2 End Sub Private Sub Command2_Click() Form2.Show End Sub'在form2中 Public b2 As Integer Private Sub Form_Load() b2 = 222 End Sub Private Sub Command1_Click() Print b2 Print Form2.b2 Print Form1.a1 '打印form1 中的a1的 值 End Sub
我说一个方法,绝对和他们不一样,而且更好
因为以前用PowerBuilder,PB中有一个全局的结构Message用于窗体间的通信很方便,受此启发:我们可以在VB的Modoul中定义一个全局的结构(Record)包含各种数据类型,在窗体通信是:调用窗口给全局结构赋值,被调用窗口取全局结构的值,这样窗口通信变得非常方便可靠!
这也叫好方法?
2、也可以用下面的方法
'在form1中
Public a1 As Integer
Private Sub Form_Load()
a1 = 111
End Sub
Private Sub Command1_Click()
Print a1
Print Form1.a1
Print Form2.b2
End Sub
Private Sub Command2_Click()
Form2.Show
End Sub'在form2中
Public b2 As Integer
Private Sub Form_Load()
b2 = 222
End Sub
Private Sub Command1_Click()
Print b2
Print Form2.b2
Print Form1.a1 '打印form1 中的a1的 值
End Sub