窗口表:输注器具发放追踪登记表主窗口_Table1绑定到输注器具发放追踪登记表
窗口表CurrentChanged代码:
Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("输注器具发放追踪登记表").FindRow(dr)
If wz >=0 Then
Tables("输注器具发放追踪登记表").Position = wz
End If
窗口(删除)按钮代码
If Tables("输注器具发放追踪登记表主窗口_Table1").Rows.Count>0 Then
If Tables("输注器具发放追踪登记表主窗口_Table1").Current.IsNull("领用科室") = False Then
If MessageBox.Show("是否删除","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question)=DialogResult.Yes Then
Tables("输注器具发放追踪登记表主窗口_Table1").Current.Delete
End If
Else
Tables("输注器具发放追踪登记表主窗口_Table1").Current.Delete
End If
End If
问题:点击窗口(删除)按钮,删除到最后一行时提示如下错误:
.NET Framework 版本:2.0.50727.5466
Foxtable 版本:2017.12.18.1
错误所在事件:输注器具发放追踪登记表,CurrentChanged
详细错误信息:
未将对象引用设置到对象的实例。
请问老师 ,这种情况如何解决 谢谢