Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer)
If CC(Index) = True Then
If KeyAscii >= 48 And KeyAscii <= 57 Then
Text1(Index).Text = Chr(KeyAscii)
End If
End If
End Sub
在数独游戏里,我用这段代码来限制textbox只能输入数字,生成的exe文件完全无问题,但在调试程序时却常会发生文本框按键无反应,不知道有没有人碰到过?TEXTBOX的lock属性我设置为true。。这段代码应该是没问题的,因为不只一次使用过,而且有时程序莫名其妙就自己好了。。有谁碰到过类似状况嘛?或者有谁在调试我的数独时遇到过类似情况嘛?
If CC(Index) = True Then
If KeyAscii >= 48 And KeyAscii <= 57 Then
Text1(Index).Text = Chr(KeyAscii)
End If
End If
End Sub
在数独游戏里,我用这段代码来限制textbox只能输入数字,生成的exe文件完全无问题,但在调试程序时却常会发生文本框按键无反应,不知道有没有人碰到过?TEXTBOX的lock属性我设置为true。。这段代码应该是没问题的,因为不只一次使用过,而且有时程序莫名其妙就自己好了。。有谁碰到过类似状况嘛?或者有谁在调试我的数独时遇到过类似情况嘛?