谢谢版主！目前项目运行正常，不报错了！比对了一下前后的代码，就是在后面部分有所变化，虽然没完全明白意思，但应该是多出来的几行代码起了作用！有几个问题还要请教版主：
1、因为项目调试正常发布后，要不要设置一个象没发布之前，在系统菜单里的那个“压缩项目”的按钮？
因为在发布后，不可避免的出现删除数据、录入数据；定期点击“压缩项目”可以清理删除数据后占用的空白行（好象是这么说的），提高运行效率。还是发布后无需理会？请版主指教！
2、窗口里有个“重置列”按钮，之前是不报错的，现在点击也报错了，如下图：
此主题相关图片如下：360截图20190121.png
这又是为什么？表的DataColChangrd事件代码的问题？可之前是不报错的！
按钮代码：完全是套用系统菜单里的“重置列”按钮代码
If CurrentTable IsNot Nothing AndAlso CurrentTable.ColSel >= 0 Then
Dim dc As DataCol = CurrentTable.Cols(CurrentTable.ColSel).DataCol
dc.RaiseDataColchanged()
End If
[此贴子已经被作者于2019/1/21 12:45:20编辑过]
加好友 
发短信
Post By：2019/1/21 10:13:00 [显示全部帖子]
Post By：2019/1/21 10:33:00 [显示全部帖子]
搞不定了！上传实例，现在的错误让我头大，要么报错！要么重复增加行，有时还会多出N行空白行（只导入了300多行，实际有6万多行），我把表代码都清了做试验，还是不行，貌似原来是不会的！