vba 得到数字

Posted bignine

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了vba 得到数字相关的知识,希望对你有一定的参考价值。

‘得到数字

Function getnum(s)
  n = Len(s)                        ‘求出s的长度,放在变量n中
  For i = 1 To n                    ‘进行n次循环
    a = Mid(s, i, 1)                ‘取s中第i个字符,放在a中
‘    If a >= 0 And a <= 9 Then ‘大于等于0,小于等于9的为数字
     If a Like "[0-9]" Then  ‘如果a在0-9之间
      getnum = getnum & a                   ‘拼接
    End If
  Next
End Function

 










以上是关于vba 得到数字的主要内容,如果未能解决你的问题,请参考以下文章

使用 VBA 将十进制数转换为分钟和秒

如何用vba将文本数字改为数值?

vba项目数字证书干啥用的

VBA欧美数字格式

vba如何启动数字键盘

excel vba 将一个文本框TEXTBOX1限定只能输入数字,如果输入其他汉字或者字母提示,输入错误,请输入数字