标题：增加行

1楼

球球发表于：2011/12/27 11:07:00

Syscmd.Row.AddNew() 增加一行

Syscmd.Row.AddNews() 增加多行

上面的命名是系统的增加行，如何实现真对某一个表增加一行或多行的代码，请指教。

2楼

游山玩水 发表于：2011/12/27 11:11:00

Tables("表名").AddNew()

3楼

球球发表于：2011/12/27 11:11:00

Tables("产品").AddNew() 这是针对一个表增加单行的代码

Tables("产品").AddNew(10) 这是针对一个表增加多行的代码，但是这段代码只能固定的增加数量很不灵活。

系统自动带的一个增加多行代码，能不能实现针对一个表实现随意增加多行的代码。

4楼

游山玩水 发表于：2011/12/27 11:16:00

设置一个变量n，做一个数值框给n赋值，

Tables("表名").AddNew(n)

5楼

球球发表于：2011/12/27 12:38:00

我很愚昧能不能做一个例子谢谢您了

6楼

blackzhu 发表于：2011/12/27 13:00:00

Dim Val As Integer
If InputValue(Val, "增加行", "请输入要增加的行数:") Then
Tables("表C").AddNew(Val)
End If

[此贴子已经被作者于2011-12-27 13:00:26编辑过]

共6 条记录, 每页显示 10 条, 页签: [1]