以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 帮我看看这些代码 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=2754) |
-- 作者:卟离卟弃 -- 发布时间:2009/5/12 8:37:00 -- 帮我看看这些代码 Select Case e.DataCol.Name Case "负责工程师","任务编号" Dim dr1 As DataRow = e.DataRow Dim dr2 As DataRow If dr1("负责工程师") = "聂宗财" Then Dim Filter As String = "负责工程师 = \'聂宗财\' And 任务编号 = \'" & dr1("任务编号") & "\'" dr2 = DataTables("任务进度表").find(Filter,"事件级别") If dr2 Is Nothing Orelse dr2.Isnull("实际开始时间") Then dr1("实际开始时间") = Nothing Else dr1("实际开始时间") = dr2("实际开始时间") End If dr2 = DataTables("任务进度表").Find(Filter,"事件级别 Desc") If dr2 Is Nothing Orelse dr2.Isnull("实际结束时间") Then dr1("实际结束时间") = Nothing Else dr1("实际结束时间") = dr2("实际结束时间") End If End If End Select 这些代码有一个问题, dr2 = DataTables("任务进度表").Find(Filter,"事件级别 Desc") Filter,"事件级别 Desc")代码中的Desc只能判断0到9。超过后就无效了。怎么样改成无数,0到99999999999 有办法吗? |
-- 作者:狐狸爸爸 -- 发布时间:2009/5/12 8:44:00 -- 这是因为事件级别是字符型,你改为整数型就可以了。 |
-- 作者:卟离卟弃 -- 发布时间:2009/5/12 8:49:00 -- 哦,谢谢 |