主题：增加行 提示错误怎么回事

订单_DataColChanged

If e.DataCol.Name = "编号" Then

    If e.DataRow.GetChildRows("关联").Count = 0 Then

        Dim dr As DataRow = DataTables("关联").DataRows.AddNew()

        dr("编号") = e.newvalue           ' 也许是这里的问题···

    End If

End If