主题：各种乱入都走不通

晕啊，Table ,DataTable分不清

 

要这种效果：点按钮，窗口表“标记”列所有行标记上“核算中”

 

Dim blbm As String = e.Form.Controls("Label03").Text

 

If MsgBox("将提交该批次(" & blbm & ")核算,确定提交?",65,"提示") = 1 Then

    Dim a As Table = Tables("登记_Table1")

    For r As Integer = a.rows.Count - 1 To 0 Step -1

        Dim dr As DataRow

        dr = DataTables("登记_Table1").DataRows(r)

        dr("标记") = "核算中"'

    Next

End If

With DataTables("明细")

    .LoadFilter = "[_Identify] Is Null"

    .Load()

End With

 

 

按上面的改了，但该死的“Object reference not set to an instance of an object.”还是没飞走

经测试，能在“标记”列记上“核算中”，但是就是会弹出出错提示。

 

稍等，做个实例。

“核算中”就6个字符，默认16个字符，应该够了

做的例子正常，怎么回事？让我想想。

原因找到了，窗口表CurrentChanged 事件冲突，删除代码后好了