求教怎样用按键精灵区分文字和数字
展开全部
q="我在花园10单元25号"
For i=1 to len(q)
If int(Mid(q, i,1))<>""
a=a&int(Mid(q, i,1))
Else
b=b&Mid(q, i,1)
End If
Next
MessageBox a&" , "&b
For i=1 to len(q)
If int(Mid(q, i,1))<>""
a=a&int(Mid(q, i,1))
Else
b=b&Mid(q, i,1)
End If
Next
MessageBox a&" , "&b
追问
那如果q="我在花园10,25号“
怎么把”10,25“中间的逗号都识别出来，
而不只是1025啊？
追答
dim a,b
q="我在花园10单元,25号"
For i=1 to len(q)
If IsNumeric(Mid(q, i, 1)) = True or Mid(q, i, 1)=","
a = a & Mid(q, i, 1)
Else
b = b & Mid(q, i, 1)
End If
Next
MessageBox a&" , "&b
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
黄先生
2024-12-27 广告
**混合矩阵切换器具备长线驱动能力**。它输入端带有自动均衡功能，可有效减少因线路传输导致的确定性抖动（ISI），而输出端则带有预加重功能，确保长线传输后接收端仍能接收信号。在理想环境下，混合矩阵切换器通过标准线缆可支持较长的输入和输出距离...
点击进入详情页
本回答由黄先生提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
