if dtset1.Tables.Count > 0 Then
if dtset1.Tables(0).Rows.Count > 0 then
Dim th as Data.DataTable = dtset1.Tables(0)
dtset1.Tables.Remove(th)
Tables("车辆状态管理_Table2").DataSource = th
end if
end If
刚试过,还是不行的,会出现同样的错误。请老指点!!!谢了!!!!
如果有记录时,就不会出现错误。真不知是哪出问题了。
以上出错图示主要是if dtset1.Tables(0).Rows.Count > 0 then 判断时无数据时会出错,但错误提示中“uploadtime”是产生数据时其中一个时间字段名称。
根据错误提示,和这段代码无关的。
而是在某个控件的checkedchanged事件,自己查查。
有关的,这个代码放在checkbox1,checkedchanged中,我是通过messagebox.show(1)及messagebox.show(2)来找到哪一行有问题的,就是 if dtset1.Tables(0).Rows.Count > 0 then 有问题。