以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69783)
--  作者：zcgmxf
--  发布时间：2015/6/10 21:41:00
--  [求助]
老师，请问如何在窗口中的关联表一次性增加多行啊？谢谢！
--  作者：大红袍
--  发布时间：2015/6/10 21:51:00
--  

Tables("表A").AddNew(10)
--  作者：大红袍
--  发布时间：2015/6/10 21:52:00
--  

或者

 

For i As Integer = 1 To 10
    Dim nr As Row = Tables("表A").AddNew
    nr("第一列") = "12345"
Next
--  作者：zcgmxf
--  发布时间：2015/6/10 21:53:00
--  
请问如何像系统Syscmd.Row.AddNews()命令那样出现一个对话框，让用户自己选择增加的行数呢？谢谢！
--  作者：大红袍
--  发布时间：2015/6/10 22:09:00
--  
Dim count As Integer = 10
If InputValue(count, "增加多行", "请入要增加的行数") Then
    Tables("表A").AddNew(count)
End If
--  作者：zcgmxf
--  发布时间：2015/6/10 22:17:00
--  
非常感谢！