我有 4 个表单,每个表单的编辑窗体上都有 DateBox1 与 NumericBox1 ,每个编辑窗体都有相同代码:
Private Sub DateBox1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateBox1.ValueChanged
Dim SL As Decimal = Me.Table2.Compute("sum(数量)")
Me.NumericBox1.Value = SL
End Sub
其中两个表单在新增时正常,两个表单在新增时提示此错误
我发现只需将 Me.NumericBox1.Value = SL 这一行注释掉后就不提示错误了,
但这行代码为什么不行?有相同代码的另两个表单在新增时为什么又是正常的呢?