VB 请大家帮我找找错 查询语句

Question

窗体LOAD部分给combo1添加了记录:
Combo1.AddItem "类型编号"
Combo1.AddItem "类型名称"查询按钮代码
    rs.Open "select khlx_key as 类型编号,khlx_name as 类型名称,khlx_beizhu as 备注 from khlx where '" & Combo1.Text & "'='" & Text1.Text & "' ", cn, adOpenKeyset, adLockOptimistic
    Set VSFlexGrid1.DataSource = rs想变着条件来查询,但结果总不理想,不知道这条查询语句哪里错了.请大家帮我一起找.

Answer 1

"select khlx_key as 类型编号,khlx_name as 类型名称,khlx_beizhu as 备注 from khlx where " & Combo1.Text & "='" & Text1.Text & "'"

Answer 2

这样写比较规范:
dim SqlStr="select khlx_key as 类型编号,khlx_name as 类型名称,khlx_beizhu as 备注 from khlx where " & Combo1.Text & "='" & Text1.Text & "'"
rs.Open SqlStr, cn, adOpenKeyset, adLockOptimistic,adcmdtext

Answer 3

combo1.additem时不能写列别名，要写字段名
combo1.additem "hklx_key"
combo1.additem "khxl_name"

Answer 4

方2个Combobox
1个放编码 隐藏，不可见
1个放名称 供用户选择在查询时 调整 同步编码下拉框的索引 依据 名称下拉框的索引
然后组装查询语句

Answer 5

还可以吧  khlx_key 、 类型编号、数据表名称 的对应关系存在数据库中
通过数据库查询返回 选择的  “类型编号” 在 “数据表名称” 中所对应的  “khlx_key” 字段名，这两种方法都是我常用的

Answer 6

接来想要通过SQL语句实现查询
select * from 表一 where [通过查询产生的条件] =[text1.text的值]
准确的语句应该怎么写呢?想了办法,试了很多方法没搞定.唉....SQL的基础要好好补一下了.

Answer 7

MSDN安装后C:\Program Files\Microsoft Visual Studio\MSDN98\98VS\2052\SAMPLES\VB98\visdata
下面有个例子，其中就有一个窗体是你说的这样的，就怕你看不懂
另外一个问题一个问题的问，否则你的问题没人注意到