Foxtable(狐表)用户栏目专家坐堂 → [求助]如何判断某一字符是否为数字?


  共有3091人关注过本帖树形打印复制链接

主题:[求助]如何判断某一字符是否为数字?

帅哥哟,离线,有人找我吗?
sensen9025
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:88 积分:844 威望:0 精华:0 注册:2013/10/15 15:04:00
[求助]如何判断某一字符是否为数字?  发帖心情 Post By:2015/1/20 11:48:00 [只看该作者]

dim str as string="2C1Z+1Y",一个数字,然后是字母,还有一个加号。

如何得到所有数字的总和:2+1+1=4?

 

怎么判断一个字符为数字还是字母?


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/1/20 11:50:00 [只看该作者]

连在一起的怎么算?   21C1Z+12K  

 回到顶部
帅哥哟,离线,有人找我吗?
sensen9025
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:88 积分:844 威望:0 精华:0 注册:2013/10/15 15:04:00
  发帖心情 Post By:2015/1/20 11:55:00 [只看该作者]

加号不是真的运算,只是一个记号。

我只需要把表达式里所有的数字累加便可。


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/1/20 11:57:00 [只看该作者]

我的问题不是这个,我是说数字连在一起的怎么算? 分开算?

 回到顶部
帅哥哟,离线,有人找我吗?
sensen9025
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:88 积分:844 威望:0 精华:0 注册:2013/10/15 15:04:00
  发帖心情 Post By:2015/1/20 12:00:00 [只看该作者]

不用分开,一次性累加。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/20 12:05:00 [只看该作者]

Dim str As String = "2C1Z+1Y"
Dim reg As new System.Text.RegularExpressions.Regex("[0-9]+")
Dim mc As Object = reg.matches(str)
Dim sum As Double = 0
For i As Integer = 0 To mc.count - 1
    sum += mc(i).Value
Next
msgbox(sum)

 回到顶部
帅哥哟,离线,有人找我吗?
sensen9025
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:88 积分:844 威望:0 精华:0 注册:2013/10/15 15:04:00
  发帖心情 Post By:2015/1/20 12:22:00 [只看该作者]

OK!谢谢有点甜,非常到位。

 回到顶部