主题：加载很慢

For Each ary() As String In DataTables("配载订单").GetValues( "车牌|车型")
    Dim filter As String = "车牌 = '" & ary(0) & "' and 车型 = '" & ary(1) & "'"
    Dim fdr As DataRow = DataTables("配载订单").Find(filter)
    DataTables("配载订单").DataCols("车牌").RaiseDataColChanged(fdr)
Next

调度配载 重置车牌 是这样加在按钮事件上吗，我加了 点击报错 {未将对象设置运用到对象实例上}