为何form2的command事件中strtest没有值????
module1的内容(将其设为启动)
Sub Main()
Dim frmNew As New Form1
frmNew.Show 1
End Sub
form1的代码:
Option Explicit
Public strTest As String
Private Sub Command1_Click()
Form2.Show 1
End Sub
Private Sub Form_Load()
strTest = "测试成功!"
End Sub
form2的代码:
Option Explicit
Private Sub Command1_Click()
MsgBox frmNew.strTest
End Sub