Question

vb中窗体间传值问题

form1中的代码: Option Explicit Public a, b, c As Integer Private Sub Command1_Click() '按钮 Form2.Show '调用窗体form2运算c的值 Print "a+b=" & c End Sub Private Sub Form_Click() Print "a=" & a Print "b=" & b End Sub Private Sub Form_Load() a = 1 b = 2 End Sub form2窗体中的代码: Option Explicit Private Sub Form_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then '关闭form2语句怎么写,不是hide End If End Sub Private Sub Form_Load() Form1.c = Form1.a + Form1.b End Sub 问题1:运行后就是不对 总是2:运行窗体form2按回车用什么方法关闭窗体2 这两个窗体，最主要的目的就是，让窗体2中得到数据，然后直接在1窗体中调用。

Answer 1

多窗体调用变量建议在模块中定义变量！
新建个模块在模块中定义A，B，C
Private
Sub
Command1_Click()
'按钮
Form2.Show
'调用窗体form2运算c的值
Print
"a+b="
&
c
'这里所有代码都会执行完，如果没猜错的话应该会输出0
End
Sub
Private
Sub
Form_Click()
Print
"a="
&
a
Print
"b="
&
b
End
Sub
Private
Sub
Form_Load()
a
=
1
b
=
2
End
Sub
form2窗体中的代码:
Option
Explicit
Private
Sub
Form_KeyPress(KeyAscii
As
Integer)
If
KeyAscii
=
13
Then
UNLOAD
ME
End
If
End
Sub
Private
Sub
Form_Load()
C=A+B
form1.print
"a+b="&c
End
Sub
我没试，乱想出来的，刷分！