以下代码用于单击登陆按钮后,判断上次登陆后至今增加的新纪录,调试到messagebox.Show(n)这句,程序就挂了(之前的语句没问题),也没有任何提示,只能强退,不知何故,请指教!
Dim n As Integer
n = GetConfigValue("最后_Identify", "")
Dim id As Integer = DataTables("收款明细记录").Compute("Max(_Identify)")
SaveConfigValue("最新_Identify", id)
Dim m As Integer
m = id-n
messagebox.Show(n)
messagebox.Show(id)
If m > 0 Then
Forms("收付款提醒弹窗").Open
End If