VB找错~~~求解

显示全部楼层 · 2012-10-30 21:12:57

Dim n As Byte改为Static n As Byte...

千问 · 2012-10-30 21:12:57

Dim n As IntegerPrivate Sub command1_click()
If Text2 = "Basic 1234" Then
MsgBox "祝贺你，登陆成功！", vbInformation
n = 0
Exit Sub
End If
MsgBox...

千问 · 2012-10-30 21:12:57

'command1_click改成这样 Dim n As BytePrivate Sub command1_click()If n = 3 Then EndIf Text2.Text = "Basic1234" ThenMsgBox "祝贺你,成功登录"n = 0ElseMsgBox "对不起,密码错误,无法登录"n = ...

千问 · 2012-10-30 21:12:57

Dim n As Byte改为Static n As Bytedim 每次点击按键执行处理程序时都会重新给n分派内存，也就是每次都把n清零了，这样产生错误，ststic申明n为静态变量，其内存地址不会被错误的重新分配，每次调用子程序都保持了上次结束时的值。...