各位老师：
我做的一个表在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)
加好友 
发短信
Post By：2018/5/25 15:15:00 [只看该作者]
