老师您好!我按照帮助文件,在窗口底部加个状态栏,按帮助在SQLTable(查询增值税缴纳情况_金蝶组合表)的AfterSelRangeChange事件加上代码:
If e.Form IsNot Nothing Then
Dim it As Winform.StripItem = e.Form.Strips("状态栏").Items("Stat")
Dim t As Table = e.Table
it.Text = ""
If t.Cols(t.ColSel).IsNumeric Then '如果当前列是数值列
it.Text = "求和:" & Format(t.Aggregate(AggregateEnum.Sum,t.TopRow,t.ColSel,t.BottomRow,t.ColSel),"#,##0.00")
End If
End If
在打开窗口时出现以下运行错误提示:
此主题相关图片如下:qq截图20211025182345.png
关闭7次运行错误提示后,能正常进入,而且求和计算正确。
此主题相关图片如下:qq截图20211025183509.png
请问老师代码错在哪里,望指教为感!!!
谢谢啦!