1、最好加个判断,判断是否存在CurrentTable,是否存在Current。
if CurrentTale Is Nothing Orlelse CurrentTable.Current Is Nothing Then
statusbar.message3 = “”
Else
原来的代码
End If
还有原来的代码,jis最好也判断一下是否为0,不要出现除0的情况
2、这个不好说。