求vb大神帮助。。。文本输出问题，，，坐等。。。。 - 编程论坛

#2

apull2013-05-12 22:35

把第二个窗口再模块中定义成全局变量，然后在这个窗口里调用，可以获取第二个窗口里空间内容。

#3

风吹过b2013-05-13 15:56

a=form2.text1.text

控件的属性，在工程里是可以直接引用的。
窗体名.控件名.属性

窗体的全局变量，就是在 form 代码里，以public 定义的变量，也是可以直接引用的。
窗体名.变量名

#4

tglyq2013-05-19 19:11

第二个窗体代码：
Private Sub Command1_Click()
If Text1.Text <> "" Then Load Form1
把第一个窗体代码修改为：
Public delt, twfin, autot, a As Single
Private Sub Command9_Click()
' Print a
CommonDialog1.Filter = "文本文件(*.txt)|*.txt"
CommonDialog1.InitDir = "E：\"
CommonDialog1.Action = 2
CommonDialog1.FileName = Form2.Text1.Text
If CommonDialog1.FileName <> "" Then
Open CommonDialog1.FileName For Output As #1
Print #1, a
Close #1
End If
End Sub

Private Sub Form_Load()
CommonDialog1.FileName = Form2.Text1.Text
CommonDialog1.ShowSave
Call Command9_Click
End Sub
首先运行第二个窗体，自动打开第一个窗体，另存为。其他，你看的修改吧