| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1190 人关注过本帖
标题:asc()
取消只看楼主 加入收藏
in羊羊
Rank: 1
等 级:新手上路
帖 子:144
专家分:0
注 册:2005-4-17
收藏
 问题点数:0 回复次数:1 
asc()
e = Val(Text2.Text)
If e < Asc("0") Or e > Asc("9") Then
e = 0
k = MsgBox("学号中只能输入数字,不包含其他字符! ", vbExclamation)
'Text2.Text = ""
Exit Sub
End If
 我是想判断输入的是否是字符串。asc()我查了只能判断第一个字符。
这里写0和9而不写字母会返回什么?
搜索更多相关主题的帖子: asc Asc 字符 数字 Val 
2005-06-30 21:29
in羊羊
Rank: 1
等 级:新手上路
帖 子:144
专家分:0
注 册:2005-4-17
收藏
得分:0 
呵呵我自己解决了
用了个函数
是这样的
If IsNumeric(Text2.Text) = False Then  '判断输入的是否都是数字
MsgBox "只能输入数字!", 48, "提示"
Exit Sub
End If
2005-07-01 18:28
快速回复:asc()
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021597 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved