主题：求助 拜谢

这是3个combobox 在主页 分别是“会员卡号”“会员类型”“办卡日期”

如果仅仅设定一个“会员卡号”，那么在下拉菜单中能够显示出来所有不重复的“会员卡号”

代码如下：

Dim hykh As WinForm.ComboBox = e.Form.Controls("会员卡号")
hykh.ComboList = DataTables("会员信息表").GetComboListString("会员卡号")

但是要让3个combobox分别显示他们的下拉菜单

这样定义 他们竟然一个都不显示了  很郁闷          请教一下高手   谢谢

Dim hykh As WinForm.ComboBox = e.Form.Controls("会员卡号")
Dim hylx As WinForm.ComboBox = e.Form.Controls("会员类型")
Dim bkrq As WinForm.ComboBox = e.Form.Controls("办卡日期")

hykh.ComboList = DataTables("会员信息表").GetComboListString("会员卡号")
hylx.ComboList = DataTables("会员信息表").GetComboListString("会员类型")
bkrq.ComboList = DataTables("会员信息表").GetComboListString("办卡日期")

 代码看着没什么毛病……不敢断言。

没道理的，做个简单例子发上来。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

他应该3个combobox分别显示他们不重复的值的

麻烦看一下

谢谢

 呃……，我测试了一下，没有什么问题吧？

lin

是这样的

现在是点会员卡号的combobox 出现了所有的不重复的会员卡号

但是点会员类型  他没有任何显示  不是点过会员卡号之后点会员类型  而是单独点会员类型 按照代码 它应该把会员类型的不重复的值也显示出来啊

办卡日期也一样

 

我搞不明白了

 

麻烦您了

现在是点会员卡号的combobox 出现了所有的不重复的会员卡号

但是点会员类型  他没有任何显示  不是点过会员卡号之后点会员类型  而是单独点会员类型 按照代码 它应该把会员类型的不重复的值也显示出来啊

办卡日期也一样

因为你的窗口有个全局Enter事件

Dim hykh As WinForm.ComboBox = e.Form.Controls("会员卡号")
Dim bkrq As WinForm.ComboBox = e.Form.Controls("办卡日期")

Dim hylx As WinForm.ComboBox = e.Form.Controls("会员类型")
bkrq.ComboList = DataTables("会员信息表").GetComboListString("办卡日期","会员卡号= '" & hykh.text & "'"  ).Replace( " 0:00:00 ","")
hylx.ComboList = DataTables("会员信息表").GetComboListString("会员类型","会员卡号= '" & hykh.text & "'"  )   这一句是根据卡号来取会员类型值的，没点会员卡号即为空，自然只点会员类型 他没有任何显示

那我如何设定呢

就是

1. 点会员类型 可以出来这个类型的会员卡号

      点会员卡号  可以出来这个卡号的会员类型

      总体来说  现在是单向的  怎么把它变成双向的呢

2.  输入电话号码的几个数字，可以模糊查找所有的这个电话

 

谢谢