- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]自动增加多行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=57806)
-- 发布时间：2014/10/4 13:03:00
-- [求助]自动增加多行
自动增加多行，就是在最后一行的最后一个单元格按回车键时，自动增加多行
Tables(
"客户.订单").AutoAddNew = True
上面代码只能自动增加一行，增加多行怎么写，比如自动增加2行
-- 发布时间：2014/10/4 13:16:00
--
不明白具体的应用场景，但是你可以做个变量控制，再做一个循环就是了。
-- 发布时间：2014/10/4 13:40:00
--
就是我按ENTER键后，表格后面自动增加2行（条件是当前位置是最后一行及最后一列（可编辑列））
-- 发布时间：2014/10/4 14:05:00
--
你去表事件 keydown 加入代码
If e.keyCode = keys.Enter AndAlso e.Table.Current.Index = e.Table.Rows.Count - 1 Then
e.Table.addnew(2)
End If
-- 发布时间：2014/10/4 14:41:00
--
你去表事件 keydown 加入代码
If e.keyCode = keys.Enter AndAlso e.Table.Current.Index = e.Table.Rows.Count - 1 Then
e.Table.addnew(2)
End If
以上代码没有执行,没有作用
-- 发布时间：2014/10/4 14:42:00
--
去表事件加入代码，肯定有用，测试有效。
-- 发布时间：2014/10/4 14:55:00
--
你去表事件 keydown 加入代码
If e.keyCode = keys.Enter AndAlso e.Table.Current.Index = e.Table.Rows.Count - 1 Then
e.Table.addnew(2)
End If
上面只有最后一行可以实现，如果是最后一行及最后一列条件要怎么写
-- 发布时间：2014/10/4 14:57:00
--
上面只有最后一行可以实现，如果是最后一行及最后一列条件要怎么写
If e.keyCode = keys.Enter AndAlso e.Table.Current.Index = e.Table.Rows.Count - 1 AndAlso e.Table.ColSel = e.Table.Cols.Count - 1 Then
e.Table.addnew(2)
End If
-- 发布时间：2014/10/4 15:30:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:在指定列回车新增多行.table |