以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- dr单元格中取值问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=101762) |
||
-- 作者:扶风 -- 发布时间:2017/6/6 19:00:00 -- dr单元格中取值问题
老师,如上在DataTables中的其中一行的dr(\'刷卡时间\')单元格,如何Dim一个A取逗号前的值,Dim一个B取逗号后的值?都是string型的
|
||
-- 作者:wyz20130512 -- 发布时间:2017/6/6 21:02:00 -- With Tables("表C") For Each r As Row In .Rows If r.IsNull("刷卡时间") = False Then Dim A,B As String A = r("刷卡时间").Split(",")(0) B = r("刷卡时间").Split(",")(1) Output.Show(A) Output.Show(B) End If Next End With
|
||
-- 作者:扶风 -- 发布时间:2017/6/8 16:16:00 -- Dim A,B As String a=dr("刷卡时间").Split(",")(0) b=dr("刷卡时间").Split(",")(1) dr("班次")=b 老师,如果单元格是07:57,18:34这种的,运行时是OK的,a=07:57,b=18:34 但07:57这种少一半的就报错超出数组,如何让这种少一半的直接a=07:57,b=nothing?
|
||
-- 作者:有点蓝 -- 发布时间:2017/6/8 16:30:00 -- Dim A,B As String Dim arr() As String = dr("刷卡时间").Split(",") a=arr(0) If arr.Length > 1 Then b=arr(1) End If dr("班次")=b
|