主题：窗体增加一行TABLE后，报错，请教高人指点

窗体的按钮代码

Tables("tblBillMain").AddNew()

If e.Form.Controls("txtCust")="" Then
    Return
   
End If

Table的DatarowAdding里面的代码是

e.DataRow("Riqi") = Date.Today()
e.DataRow("Creater") = _UserName
e.DataRow("CreatTime") = Date.now()

Dim bh As String = Format(e.DataRow("CreatTime"),"yyyyMMddhhmmss") '取得编号的8位前缀
e.DataRow("Zongdanhao") = bh

用狐表“增加行”可以正常添加

但是有窗体按钮，则报错

 

 

非常感谢