1,451
社区成员
发帖
与我相关
我的任务
分享如何用maskedit做一个IP的输入框，当输入"."的时候会自己跳到下一格
请问，如何用maskedit做一个IP的输入框，当输入"."的时候会自己跳到下一格
谢谢!!
谢谢!!
...全文
请发表友善的回复…
发表回复
zgvslch 2004-11-30
- 打赏
- 举报
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 46 Then
SendKeys "{Tab}"
End If
End Sub
If KeyAscii = 46 Then
SendKeys "{Tab}"
End If
End Sub
wwqna 2004-11-30
- 打赏
- 举报
If Mid(Text1.Text, Text1.SelStart + 1, 1) = "." Then
Text1.SelStart = Text1.SelStart + 1
End If
Text1.SelStart = Text1.SelStart + 1
End If
a0o20 2004-11-30
- 打赏
- 举报
那有没有其他的好办法??
qiangsheng 2004-11-30
- 打赏
- 举报
我死都不会再用maskedit了，这玩意儿根本没办法用。
