VB6:: 输入一个字符，自动判断该字符是字母字符、数字字符还是其他字符
答案:2 悬赏:0
解决时间 2021-04-08 19:17
- 提问者网友：梧桐不渝
- 2021-04-08 03:10
（提示：判断输入字符的 ASC 码值 asc（input）在“a”~”z”、 “A”~”Z”、 “0”~”9” 之间）
最佳答案
- 二级知识专家网友：蜜罐小熊
- 2021-04-08 03:19
Do
x = InputBox("请输入一个字符")
Loop Until Len(x) = 1
Select Case Asc(LCase(x))
Case 97 To 122
MsgBox "字母字符"
Case 48 To 57
MsgBox "数字字符"
Case Else
MsgBox "其他字符"
End Select
x = InputBox("请输入一个字符")
Loop Until Len(x) = 1
Select Case Asc(LCase(x))
Case 97 To 122
MsgBox "字母字符"
Case 48 To 57
MsgBox "数字字符"
Case Else
MsgBox "其他字符"
End Select
全部回答
- 1楼网友：糜废丧逼
- 2021-04-08 04:34
例如：
if midb(text.txt,1,1)<>"a" 。
if spreadsheet1.cells(1, n) = "faster" then xxxx
if isnumeric(spreadsheet1.cells(1, n) ) then xxxx
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯