以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89491)
--  作者：hbhb
--  发布时间：2016/8/23 10:07:00
--  请教
大师：为何val(20%) 不等于0.2？
--  作者：大红袍
--  发布时间：2016/8/23 10:14:00
--  

 不认识百分号。

 

Dim s As String = "20%"
If s.EndsWith("%") Then
    s = val(s) / 100
End If
msgbox(s)
--  作者：hbhb
--  发布时间：2016/8/23 10:20:00
--  
谢谢！如果这样写行不行？
Dim s As String = "20%"
If s.contains("%") Then
    s = val(s) / 100
End If
msgbox(s)
--  作者：大红袍
--  发布时间：2016/8/23 10:21:00
--  
可以。