Question

VB combo1.AddItem 怎样赋值

VB+SQL ,我的数据表Businessman里的字段是英文的 BusinessmanID， 但在控件combo1用户界面要显示中文“供应商ID”，
例：Combo1(4 * i).AddItem "businessmanid" 如果是这样查找是正确的，但在界面中显示是“businessmanid”,用户不知这是什么？
Combo1(4 * i).AddItem "供应商ID"，如果是这样，用户界面是中文，但运行是错误的，错误提示：列名“供应商ID”无效。
谢谢高手帮我，联系：lcp_sky@163.com QQ:420079219

Answer 1

方法1：
修改字段名和你的ComboBox的名称一致；

方法2：
在ComboBox的Text中添加判断语句，例如：
ComboB=Combo1.Text '''ComboB是一个过渡变量
Select Case ComboB
Case "businessmanid"
Combo1.Text="供应商ID"
..............
End Select

方法3：
在查询前进行判断，例如：
Dim ZDM As String 其中ZDM是查询变量
If Combo1.Text="businessmanid" then
ZDM="供应商ID"
............
End If

其实方法2和方法3的判断语句不论使用那个都没有问题。

Answer 2

　　方法1：
　　修改字段名和你的ComboBox的名称一致；
　　方法2：
　　在ComboBox的Text中添加判断语句，例如：
　　ComboB=Combo1.Text '''ComboB是一个过渡变量
　　Select Case ComboB
　　Case "businessmanid"
　　Combo1.Text="供应商ID"
　　..............End Select