以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]转换报错? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=108232) |
-- 作者:zgjmost -- 发布时间:2017/10/18 17:46:00 -- [求助]转换报错? For Each dr As Row In Tables("成绩台帐").rows Dim s2 As Integer = CInt(dr("分数")) If s2 < 60 Then dr("分数") = "" End If Next dr("分数")原来为文本
|
-- 作者:有点甜 -- 发布时间:2017/10/18 20:52:00 -- For Each dr As Row In Tables("成绩台帐").rows
Dim s2 As Integer = val(dr("分数"))
If s2 < 60 Then
dr("分数") = ""
End If
Next
|