主题：各种乱入都走不通

晕啊，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

 

 

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

        Dim dr As row

        dr = a.Rows(r)

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

    Next

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

你检查看,有没有"标记" 这一列? 是文本格式吗?够宽吗?

上例子吧

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

 

稍等，做个实例。

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

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

对比一下例子和你项目有何不同,不同之处就是问题所在之处

用这个方法调试一下，看看那一行出错：

http://www.foxtable.com/help/topics/1485.htm