共3 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：外部表增加行的问题（已解决）
1楼
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[此贴子已经被作者于2009-6-15 14:34:40编辑过]
2楼
cpayinyuan 发表于：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()来判断.帮助中有的.
3楼
sohper 发表于：2009/6/15 11:14:00
谢谢大侠，OK了，感谢感谢！还是没注意到一些细节啊！
共3 条记录, 每页显示 10 条, 页签:
[1]