- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 外部表增加行的问题（已解决） (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=3145)
-- 发布时间：2009/6/15 10:36:00
-- 外部表增加行的问题（已解决）
外部数据表
想在增加行的时候加入一个控制，判断最后一行的某一“必输”列是否为空，如果不为空就增加一行，否则返回，在新增按钮的Click事件中加入代码如下：
If CurrentTable.Rows.Count =0 Then
Tables("业务员表").AddNew()
ElseIf CurrentTable.Rows(CurrentTable.Rows.Count-1).("业务员") IsNot Nothing Then
Tables("业务员表").AddNew()
Else
Return
End If
这个代码在代码窗口中点击确定时返回
此主题相关图片如下：1.jpg
[此贴子已经被作者于2009-6-15 14:34:40编辑过]
-- 发布时间：2009/6/15 11:06:00
--
以下是引用sohper在2009-6-15 10:36:00的发言：
外部数据表
想在增加行的时候加入一个控制，判断最后一行的某一“必输”列是否为空，如果不为空就增加一行，否则返回，在新增按钮的Click事件中加入代码如下：
If CurrentTable.Rows.Count =0 Then
Tables("业务员表").AddNew()
ElseIf CurrentTable.Rows(CurrentTable.Rows.Count-1).("业务员") IsNot Nothing Then
Tables("业务员表").AddNew()
Else
Return
End If
这个代码在代码窗口中点击确定时返回
此主题相关图片如下：1.jpg
外部数据表
想在增加行的时候加入一个控制，判断最后一行的某一“必输”列是否为空，如果不为空就增加一行，否则返回，在新增按钮的Click事件中加入代码如下：
If CurrentTable.Rows.Count =0 Then
Tables("业务员表").AddNew()
ElseIf CurrentTable.Rows(CurrentTable.Rows.Count-1).("业务员") IsNot Nothing Then
Tables("业务员表").AddNew()
Else
Return
End If
这个代码在代码窗口中点击确定时返回
此主题相关图片如下：1.jpg对于row ,不能用 isnot nothing来判断,应改为 .isnull()来判断.帮助中有的.
-- 发布时间：2009/6/15 11:14:00
--
谢谢大侠，OK了，感谢感谢！还是没注意到一些细节啊！