以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  字符串转数值列异常  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142054)

--  作者:benwong2013
--  发布时间:2019/10/17 12:10:00
--  字符串转数值列异常
折扣为字符串,比如60.00%,现在须将其转换为数值列 折扣率,以下代码出错,不清楚错在哪里


Dim r As Row = Tables("导出数据").Current
Dim txt As String = r("折扣")
Dim zk As Double = Val(txt)/100
r("折扣率") = zk

--  作者:有点蓝
--  发布时间:2019/10/17 13:39:00
--  
Dim txt As String = r("折扣").trim("%")