如何在form之间传递变量

[jealousme]

有一个form1 其中有一个按钮，当单击按钮弹出form2。同时得到form1中一个text控件的值！！！！

简单！！！！！

可是我不。。。。。。。

[lisong770818]

dim A

A=form1.text1.text

[xayzmb]

public or property

[射天狼]

MsgBox form1.text1.Text

[viena]

Private Sub Command1_Click()
dim strx as string
form2.show
strx = text1.text
……
End Sub

[jealousme]

不好用！！

出错！！！

[Sunron128]

Private sub Command1_Click()
Form2.Show
Form2.Text2.Text = Text1.Text
End Sub

[viena]

用一个模块存放公共变量
其中定义变量
public strx as string
在任何地方都可以引用这个变量

form1中的command1
Private Sub Command1_Click()
strx = text1.text
form2.show
End Sub