通过组合框的条件查找数据库中字段相同的数据库信息,通过选择combo1品牌combo2款式的选择让指针找出对应该选项的那行数据怎么编啊
If Combo1.Text > "" Then
Adodc1.RecordSource = "select * from 表1 where 系列= '" & Combo1.Text & "'and 品牌= '" & Combo2.Text & "' and 款式= '" & Combo3.Text & "'"
Else
Adodc1.RecordSource = "select * from 表1"
Adodc1.refresh
怎么显示“对象"refresh"的方法"iadodc"失败呢
跪求高手解决VB利用下拉组合框查找数据库中对应数据的内容的编程代码,跪谢!!
答案:2 悬赏:10 手机版
解决时间 2021-03-17 12:02
- 提问者网友:棒棒糖
- 2021-03-16 11:43
最佳答案
- 五星知识达人网友:逐風
- 2021-03-16 12:22
If Combo1.Text <>"" Then
Adodc1.RecordSource = "select * from 表1 where 系列='" & Combo1.Text & "' and 品牌='" & Combo2.Text & "' and 款式='" & Combo3.Text & "'"
Else
Adodc1.RecordSource = "select * from 表1"
end if
Adodc1.refresh
Adodc1.RecordSource = "select * from 表1 where 系列='" & Combo1.Text & "' and 品牌='" & Combo2.Text & "' and 款式='" & Combo3.Text & "'"
Else
Adodc1.RecordSource = "select * from 表1"
end if
Adodc1.refresh
全部回答
- 1楼网友:迷人又混蛋
- 2021-03-16 12:55
你原来的语句中既有双引号,也间单引号,还真不容易看清楚,我把单引号和双引号间加了空格才看出来
rs.open "select 破断拉力 from 钢丝绳 where 类别= ' " & combo1.text &" ' and 绳径= ' " & combo2.text & " '
从形式上看,是最后那个单引号应该是一个独立的字符串,但你的却不是
把这句改成
rs.open "select 破断拉力 from 钢丝绳 where 类别= ' " & combo1.text & " ' and 绳径= ' " & combo2.text & " ' "
而且我觉得还有问题的是:你的绳径我不知道是什么类型,如果是数值型的,那么在查询时,其内容常量是不该被引号引起来的,如果是这样,上句该改成:
rs.open "select 破断拉力 from 钢丝绳 where 类别= ' " & combo1.text & " ' and 绳径= " & combo2.text
你的text1的数据不可修改也许是因为数据绑定的原因,如果不是绑定数据,就可以修改了
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯