Foxtable(狐表)用户栏目专家坐堂 → 输入值,显示不对


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

主题:输入值,显示不对

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


加好友 发短信
等级:幼狐 帖子:54 积分:614 威望:0 精华:0 注册:2011/10/20 13:03:00
输入值,显示不对  发帖心情 Post By:2011/10/25 19:48:00 [显示全部帖子]

在销货单输入数据,其中有4列想录入商品明细表里面,使用下面代码:

 

Dim r1 As Row =Tables("销货单").AddNew()
Dim r2 As Row = Tables("商品明细表").AddNew()

r1("商品简码") = e.Form.Controls("TextBox3").Value
r1("商品名称") = e.Form.Controls("TextBox5").Value
r1("数量") = e.Form.Controls("TextBox6").Value
r1("单价") = e.Form.Controls("TextBox7").Value
r1("录入员") = user.name

MessageBox.Show(r1("商品简码"), "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

r2("商品简码") = e.Form.Controls("TextBox3").Value
r2("商品名称") = e.Form.Controls("TextBox5").Value
r2("数量") = e.Form.Controls("TextBox6").Value
r2("单价") = e.Form.Controls("TextBox7").Value
r2("录入员") = user.name

 

输入数据后,提交是,弹出对话框, 显示数据为“0”, 而我输入的值为“111”,请问版主,这个代码需要怎么修改,谢谢

 

[此贴子已经被作者于2011-10-25 20:01:47编辑过]

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


加好友 发短信
等级:幼狐 帖子:54 积分:614 威望:0 精华:0 注册:2011/10/20 13:03:00
  发帖心情 Post By:2011/10/25 20:05:00 [显示全部帖子]

在销货单输入数据,其中有4列想录入商品明细表里面,使用下面代码:

 

Dim r1 As Row =Tables("销货单").AddNew()
Dim r2 As Row = Tables("商品明细表").AddNew()

r1("商品简码") = e.Form.Controls("TextBox3").Value
r1("商品名称") = e.Form.Controls("TextBox5").Value
r1("数量") = e.Form.Controls("TextBox6").Value
r1("单价") = e.Form.Controls("TextBox7").Value
r1("录入员") = user.name

MessageBox.Show(r1("商品简码"), "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

r2("商品简码") = e.Form.Controls("TextBox3").Value
r2("商品名称") = e.Form.Controls("TextBox5").Value
r2("数量") = e.Form.Controls("TextBox6").Value
r2("单价") = e.Form.Controls("TextBox7").Value
r2("录入员") = user.name

 

输入数据后,提交是,弹出对话框, 显示数据为“0”, 而我输入的值为“111”,请问版主,这个代码需要怎么修改,谢谢


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


加好友 发短信
等级:幼狐 帖子:54 积分:614 威望:0 精华:0 注册:2011/10/20 13:03:00
  发帖心情 Post By:2011/10/25 20:18:00 [显示全部帖子]

你好   烦请查看销货单表    第二个窗口,谢谢

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar

提示密码时,输888

[此贴子已经被作者于2011-10-25 20:19:04编辑过]

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


加好友 发短信
等级:幼狐 帖子:54 积分:614 威望:0 精华:0 注册:2011/10/20 13:03:00
  发帖心情 Post By:2011/10/25 21:43:00 [显示全部帖子]

我要怎么修改才可以呢?


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


加好友 发短信
等级:幼狐 帖子:54 积分:614 威望:0 精华:0 注册:2011/10/20 13:03:00
  发帖心情 Post By:2011/10/25 22:06:00 [显示全部帖子]

版主你好,单从代码上看,我写的好像和你写的一样,你给我的我测试了,是没有问题的,我不明白,这个逻辑错误应该更改哪里?烦请能给个图例说明,谢谢

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


加好友 发短信
等级:幼狐 帖子:54 积分:614 威望:0 精华:0 注册:2011/10/20 13:03:00
  发帖心情 Post By:2011/10/25 22:13:00 [显示全部帖子]

终于搞明白了,谢谢你 

 回到顶部