Foxtable(狐表)用户栏目专家坐堂 → 增加多行并赋值代码


  共有8386人关注过本帖树形打印复制链接

主题:增加多行并赋值代码

帅哥哟,离线,有人找我吗?
dj68301367
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:358 积分:2719 威望:0 精华:0 注册:2015/4/12 12:13:00
  发帖心情 Post By:2015/6/3 16:13:00 [显示全部帖子]

厉害,如果用这个增加呢 ?  
Syscmd.Row.AddNews()

 回到顶部
帅哥哟,离线,有人找我吗?
dj68301367
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:358 积分:2719 威望:0 精华:0 注册:2015/4/12 12:13:00
  发帖心情 Post By:2015/6/3 16:25:00 [显示全部帖子]

BIN
 如果我原有表格中第一列就有数据,目前新增X行,每行第一列都输入字符“AAA”,代码怎么写
Syscmd.Row.AddNews() 



 回到顶部
帅哥哟,离线,有人找我吗?
dj68301367
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:358 积分:2719 威望:0 精华:0 注册:2015/4/12 12:13:00
  发帖心情 Post By:2015/6/3 16:50:00 [显示全部帖子]

这段我了解了,我的想法是每次增加的行数不一定(变量),Syscmd.Row.AddNews() 用这个系统命令增加的,

 回到顶部
帅哥哟,离线,有人找我吗?
dj68301367
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:358 积分:2719 威望:0 精华:0 注册:2015/4/12 12:13:00
  发帖心情 Post By:2015/6/3 17:38:00 [显示全部帖子]

再做一个窗口,理解不了???能讲详细点吗?




 回到顶部
帅哥哟,离线,有人找我吗?
dj68301367
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:358 积分:2719 威望:0 精华:0 注册:2015/4/12 12:13:00
  发帖心情 Post By:2015/6/4 10:32:00 [显示全部帖子]


此主题相关图片如下:增加行.png
按此在新窗口浏览图片

如图,我做了一个,也能实现增加多行的功能,可是还有一个问题?  
代码如下,这样的话,就没办法增加多行,如果把代码写在增加行_确认_Click 的话,又不能共用其它窗体
有些窗体需要在不同的三列输入数据

编辑BOM_增加多行_Click

 

'Tables("BOM").AddNew(e.Form.Controls("Tet数量").value)

msn=0

Forms("增加行数").open()

 

For i As Integer = 1 To msn

    Dim nr As Row = Tables("BOM").AddNew

    nr("成品编码") = mbtname

Next


增加行数_增加行_确认_Click

 

msn=e.Form.Controls("Num1").value


[此贴子已经被作者于2015/6/4 10:33:10编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
dj68301367
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:358 积分:2719 威望:0 精华:0 注册:2015/4/12 12:13:00
  发帖心情 Post By:2015/6/4 11:05:00 [显示全部帖子]

顶一下,

 回到顶部
帅哥哟,离线,有人找我吗?
dj68301367
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:358 积分:2719 威望:0 精华:0 注册:2015/4/12 12:13:00
  发帖心情 Post By:2015/6/4 11:16:00 [显示全部帖子]

BIN,谢谢,是窗口模式问题,已改善

 回到顶部