- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 狐爸 关于AfterOpenProject的疑问！！【已解决】 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=31724)
-- 发布时间：2013/4/19 14:56:00
-- 狐爸 关于AfterOpenProject的疑问！！【已解决】
今天发布给客户一个项目，客户测试后要改一下，于是按Ctrl进入！
打开项目属性 改AfterOpenProject
Dim dr As Row=Tables("表A").current
If dr.Isnull("第一列") Then
Return
End If
保存时提示
此主题相关图片如下：未命名.jpg
于是测试了一下！！ 表A有数据 正常 ，
没有数据【全部删除】会提示错误！！
可是调试程序按Ctrl 进入不会装入数据，所以就会有这个错误！不知是不是bug 是 狐爸改一下，不是，提示各位一下！
[此贴子已经被作者于2013-5-16 11:27:52编辑过]
-- 发布时间：2013/4/19 15:15:00
--
你应该判断一下有没有数据：
Dim dr As Row=Tables("表A").current
If dr Is Nothing OrElse dr.Isnull("第一列") Then
Return
End If
-- 发布时间：2013/4/19 16:07:00
--
呵呵！谢谢，忘了！！真晕，还得麻烦您啊