Office中国论坛/Access中国论坛

标题: 列表框选用数据问题求助 [打印本页]

作者: gzkrmch 时间: 2012-4-26 17:17
标题: 列表框选用数据问题求助
在窗体用上选出列表框里数据插入当前窗体时用编号插入是正常的,但用名称插入时,如果同商品名称其它不同,插入的数据总是显示第一条录入的数据,求助解决{:soso_e113:}
[attach]49084[/attach]

[attach]49085[/attach] 这是用商品编号查出的,插入是正常的

[attach]49086[/attach]

这是用商品名称查出的,插入后总是显示第一次录入的信息

作者: aslxt 时间: 2012-4-26 20:43
...
Me.单位 = Me.商品名称.Column(4, 商品名称.ListIndex)
...
注意与你原代码的区别

作者: gzkrmch 时间: 2012-4-27 09:22

aslxt 发表于 2012-4-26 20:43
...
Me.单位 = Me.商品名称.Column(4, 商品名称.ListIndex)
...

Me.商品编号 = Me.商品名称.Column(1)
  Me.商品名称 = Me.商品名称.Column(0)
  Me.品牌 = Me.商品名称.Column(2, 商品编号.ListIndex)
  Me.类别 = Me.商品名称.Column(3, 商品编号.ListIndex)
  Me.单位 = Me.商品名称.Column(4, 商品编号.ListIndex)
  Me.规格型号 = Me.商品名称.Column(5, 商品编号.ListIndex)
我都加上了,也不行啊

作者: kangking 时间: 2012-4-27 12:00
本帖最后由 kangking 于 2012-4-27 12:00 编辑

Private Sub 商品编号_AfterUpdate()

'Me.商品编号 = Me.商品编号.Column(0)
  Me.商品名称 = Me.商品编号.Column(1)
  Me.品牌 = Me.商品编号.Column(2)
  Me.类别 = Me.商品编号.Column(3)
  Me.单位 = Me.商品编号.Column(4)
  Me.规格型号 = Me.商品编号.Column(5)

End Sub

Private Sub 商品名称_AfterUpdate()

  Me.商品编号 = Me.商品名称.Column(1)
'Me.商品名称 = Me.商品名称.Column(0)
  Me.品牌 = Me.商品名称.Column(2)
  Me.类别 = Me.商品名称.Column(3)
  Me.单位 = Me.商品名称.Column(4)
  Me.规格型号 = Me.商品名称.Column(5)

End Sub

作者: gzkrmch 时间: 2012-4-27 13:34

kangking 发表于 2012-4-27 12:00
Private Sub 商品编号_AfterUpdate()

'Me.商品编号 = Me.商品编号.Column(0)

恩人啊!!!!!

太感谢了!解决了,再次感谢大家的帮助

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)