以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 求助自动增加行数代码 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=119718) |
-- 作者:huaqing8828 -- 发布时间:2018/5/30 18:41:00 -- 求助自动增加行数代码 老师,自动增加行数的代码怎么写?比如我要增加5行,写入5然后确定后自动增加5行 |
-- 作者:有点甜 -- 发布时间:2018/5/30 18:57:00 -- Dim Val As Integer = 5 If InputValue(Val, "增加行", "请输入要增加的行数:") Then For i As Integer = 1 To val CurrentTable.addnew Next End If |
-- 作者:huaqing8828 -- 发布时间:2018/5/30 19:17:00 -- 谢谢 |