在Function里不能改写窗体变量内容吗?
学着用Function来做,但怎么里面不能改变窗体变量内容吗?我在通用-->声明下定义了一个串口号,然后在Function里根据需要希望能改变使用的串口,但出了Function返回来后,Serport的内容又成了原来的值而不是在调用中被改变的值了,为什么在Function里不能改变窗体变量值呢?
Dim Serport As Integer
Function Serport_test(ByVal port As String)
Serport = Porttmp(i) '在这里能看到已经将希望的串口号给过去了.
End Function
[解决办法]
详细请看以下示例.
我是否在function 中重新申明了 Dim Serport As Integer 之类的.
Dim a As Single
Private Sub Command1_Click()
Serport_test
MsgBox a 'a=0
End Sub
Function Serport_test()
'Dim a As Single '取消这句,上面才上1
a = 1
End Function