+ -
当前位置:首页 → 问答吧 → 在线求助,一个对高手不难的难题!

在线求助,一个对高手不难的难题!

时间:2011-07-31

来源:互联网

Private Sub Inet1_StateChanged(ByVal State As Integer)
If State = 11 Then '这句判断有效,state能取到11的值。
MsgBox "网络没连接!"
End If
End Sub


Private Sub Label1_Click()
If State = 11 Then '到这里state就取不到值了,啥回事哦?
MsgBox "你的网络未连接,请先连接!"
End If
End Sub

上面的if state判断正常,但是下面的不行。。。求高手解决啥问题???

作者: gdxinge2   发布时间: 2011-07-31

你的State是局部变量啊,怎么能得到正确结果呢?

作者: c_cyd2008   发布时间: 2011-07-31

注意到ByVal State As Integer了吗?
Private Sub Label1_Click()去哪里找State呢?
所以,请打开VB6,工具、选项、编辑器,“要求声明变量”打钩,确定,再运行……

作者: hpygzhx520   发布时间: 2011-07-31

热门下载

更多