以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=119476)

--  作者:jeff69
--  发布时间:2018/5/25 15:15:00
--  [求助]

各位老师:

  我做的一个表在datacolchanged 加在下面一段代码后就闪退,我已检查过其他代码,在移除这段代码后,运作均没有问题。我左看右看也看不出问题,谁能告诉我错在哪里?


Dim qc1 As DataRow = DataTables("供应商管理").Find("[交通_项目] = \'大巴32座_全境每天\'")

Dim qc2 As DataRow = DataTables("供应商管理").Find("[交通_项目] = \'面包车16座_每天\'")

Dim qc3 As DataRow = DataTables("供应商管理").Find("[交通_项目] = \'吉普车5座_每天\'")

Dim qc4 As DataRow = DataTables("供应商管理").Find("[交通_项目] = \'小车4座_每天\'")

e.DataRow("车辆数_大巴每天") = IIF(e.DataRow("车辆数_大巴") > 0,qc1("交通_价格"),0)

e.DataRow("车辆数_面包车每天") = IIF(e.DataRow("车辆数_面包车") > 0,qc2("交通_价格"),0)

e.DataRow("车辆数_吉普车每天") = IIF(e.DataRow("车辆数_吉普车") > 0,qc3("交通_价格"),0)

e.DataRow("车辆数_小车每天") = IIF(e.DataRow("车辆数_小车") > 0,qc4("交通_价格"),0)


--  作者:有点甜
--  发布时间:2018/5/25 15:50:00
--  

要判断列名的,不然容易死循环。

 

http://www.foxtable.com/webhelp/scr/1522.htm

 


--  作者:jeff69
--  发布时间:2018/5/25 16:10:00
--  
谢谢!问题解决,我真没想到问题出在这里,因为以前也运行过,一直没问题,不知道改动了什么地方触发了循环