2种办法,楼上的是一种(那代码看着很眼熟,貌似是我以前写的),说下第二种:
Form1代码,需要一个TextBox
Private Sub Form_Load()
Form2.Show
Text1.Text = ""
End Sub
For2代码,需要一个按扭:
Private Sub Command1_Click()
Form1.Text1.Text = "来自Form2的信息"
MsgBox "修改Form1的Text1显示内容,接着关闭Form1"
Unload Form1
End Sub
在通用区出用public声明变量可以,下面是一个例子:
Form1代码:
Public a As Integer '把a定义在通用区
Private Sub Form_Load()
a = 5
Form2.Show
End Sub
Form2代码:
Private Sub Form_Load()
MsgBox Form1.a '通过Form.变量就可以访问到
End Sub
窗体1
窗体2
访问窗体2的txt1可以这样
a=form2.text1.text
这样就a就可以得到窗体2的text1里面的文本