[求助]请教简单问题！ - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → [求助]请教简单问题！

标题：[求助]请教简单问题！

只看楼主

snake3140

等　级：新手上路
帖　子：17
专家分：0
注　册：2006-4-9

问题点数：0 回复次数：1

[求助]请教简单问题！

我有一个文本框，里面只能输入数字，输入其他时提示“请正确输入！”请给出代码

搜索更多相关主题的帖子: 简单问题　

2006-04-28 21:12

kankanba

等　级：新手上路
帖　子：62
专家分：0
注　册：2005-10-24

得分:0

If Not IsNumeric(Trim(Text1(0).Text)) Then
MsgBox "请输入数字！", vbOKOnly + vbExclamation, "警告"
Exit Sub
Text1(0).SetFocus
End If

2006-04-29 14:19