Foxtable(狐表)用户栏目专家坐堂 → 如何调用货号列


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

主题:如何调用货号列

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


加好友 发短信
等级:婴狐 帖子:55 积分:505 威望:0 精华:0 注册:2011/11/16 14:31:00
如何调用货号列  发帖心情 Post By:2011/12/31 19:17:00 [只看该作者]

我想把进销存里的货号列这个字段的内容从商品资料里调过来,要怎么做!
图片点击可在新窗口打开查看此主题相关图片如下:qq截图未命名.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:小狐 帖子:359 积分:3403 威望:0 精华:0 注册:2011/8/2 20:53:00
  发帖心情 Post By:2011/12/31 19:30:00 [只看该作者]

If e.DataCol.Name = "逻辑列" AndAlso e.DataRow("逻辑列") = True Then Dim nma() As String = {"货号"} '表数据来源列 Dim nmb() As String = {"货号"} '表数据接收列 Dim dr As DataRow = DataTables("进销存").AddNew For i As Integer = 0 To nma.Length - 1 dr(nmb(i)) = e.DataRow(nma(i)) Next End If
[此贴子已经被作者于2011-12-31 19:31:15编辑过]

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/12/31 22:06:00 [只看该作者]


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


加好友 发短信
等级:婴狐 帖子:55 积分:505 威望:0 精华:0 注册:2011/11/16 14:31:00
  发帖心情 Post By:2012/1/1 10:28:00 [只看该作者]

商品资料里的款号列是有内容的,商品资料里的款号是没有内容的,我想把商品资料里的款号内容调入商品资料里的款号内容里去,怎么做

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


加好友 发短信
等级:三尾狐 帖子:760 积分:4714 威望:0 精华:0 注册:2011/12/17 18:37:00
  发帖心情 Post By:2012/1/1 10:57:00 [只看该作者]

什么叫商品资料里的款号一会儿有内容,一会儿没有内容.

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


加好友 发短信
等级:婴狐 帖子:55 积分:505 威望:0 精华:0 注册:2011/11/16 14:31:00
  发帖心情 Post By:2012/1/1 11:45:00 [只看该作者]

进销存---款号列的单元格===商品资料表---款号 列的单元格

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


加好友 发短信
等级:婴狐 帖子:55 积分:505 威望:0 精华:0 注册:2011/11/16 14:31:00
  发帖心情 Post By:2012/1/1 11:57:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:3.jpg
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:女装管理系统.table


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


加好友 发短信
等级:三尾狐 帖子:760 积分:4714 威望:0 精华:0 注册:2011/12/17 18:37:00
  发帖心情 Post By:2012/1/1 12:17:00 [只看该作者]

没有对比的?如果没有的话.你这样吧!

 

 

For i As Integer = 0 To Tables("商品资料").Rows.Count-1
    Dim dr As Row = Tables("商品资料").Rows(i)
    Dim r As Row = Tables("进销存").AddNew
    r("款号")= dr("款号")
Next

 

按钮事件测试一下

 


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


加好友 发短信
等级:婴狐 帖子:55 积分:505 威望:0 精华:0 注册:2011/11/16 14:31:00
  发帖心情 Post By:2012/1/1 17:22:00 [只看该作者]

按钮事件在哪里?

 


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


加好友 发短信
等级:婴狐 帖子:55 积分:505 威望:0 精华:0 注册:2011/11/16 14:31:00
  发帖心情 Post By:2012/1/1 17:25:00 [只看该作者]

怎么每点击鼠标一次,数据就重新加载一次,汇重复很多次的啊

附图====这是我点击了2次鼠标后就重复了2次


图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看

 回到顶部
总数 37 1 2 3 4 下一页