Question

如何在VB中读取另一个窗体的内容

意思就是 假如我有两个窗体 1是登录窗体 登陆成功以后如何在2窗体中显示1的用户名啊 如何读取那个值

Answer 1

Private Sub Command1_Click()'登录窗体中
Form2.Label1 = Text1'Text1为用户名控件。该语句可放杂Form_QueryUnload或Form_Unload中，但必须在Unload之前，一旦Me被Unload，将无法再调用
Unload Me
Form2.Show
End Sub
如果登录窗体没有被unload，可在窗体2中使用：Label1=Form1.Text1'其中text1为用户名控件。
也可定义一个全局变量，保存用户名，可随时随地调用。

Answer 2

如果窗体1（Form1)没关，可以在窗体2（Form2）中直接用Form1.Text1.Text读取其值；如果窗体1（Form1)可能关了（UnLoad），则须在模块（Module1）中声明一个全局字符串变量（Public）来保存你想在其它窗体用的内容

Answer 3

1窗体名称为d，2窗体名称为z
1窗体新建一个文本框，名称为yhm1。
2窗体新建一个文本框，名称为yhm2。
在2窗体添加代码：
Private Sub Form_Load()
yhm2.Text = d.yhm1.Text
End Sub

Answer 4

在form2中写i=form1.text1.text就可以读取form1中text1的内容。前提是form1没有被unload（卸载）。

Answer 5

将用户名定义为PUBLIC型，做法为在窗体级中定义，程序最开头