百分比如何转换为小数?

Question

例如 87%=0.87
      100%=1

Answer 1

简单做法：
  dim a() as string
  a = split(cstr(87%),"%")
  msgbox cint(a(0))/100

Answer 2

在VB里面87%被识别为87，所以可以很简单的用 val("87%")/100 或者 val(87%)/100 获得结果

Answer 3

str = "8700%"
Text1 = Format(Val(str) / 100, "###0.#0")

Answer 4

因为val就是去掉％的
一个字符串，第一位是数字，则取到第一位不是数字的地方，作为返回值
val("123ab")=123
第一位不是数字，就返回0
val("ab123")=0
就这样
所以87%中％不是数字，被截断