发布网友
共1个回答
热心网友
Public wv As Integer
Private Sub Command1_Click()
Dim wv As Integer '……………………加一句
wv = wv + 3
Print wv
Call wholesub
Print "command 1 事件过程的 wv="; wv, "全局的wv="; Form1.wv
End Sub
Private Sub Form_Load()
wv = 1
End Sub
Public Sub wholesub()
Dim wv As Integer '……………………加一句
wv = wv + 1
Form1.wv = wv + 5
Print wv
Print "wholesub 过程的 wv="; wv, "全局的wv="; Form1.wv
End Sub
'这样就不一样了。 之所以原来一样:是因为form1.wv是窗体变量,具有窗体可见性,窗体代码中默认所有的wv都是form1.wv
'而当你在过程中定义了,相同名字的局部变量时,有局部优先原则,这样就履盖了窗体的wv,加了dim wv后要用窗体WV,就必须像你那样加一个Form1.来限定才行。