标题:求助:查询问题
取消只看楼主
kissis
Rank: 2
等 级:论坛游民
帖 子:33
专家分:24
注 册:2022-8-21
结帖率:100%
已结贴  问题点数:10 回复次数:3 
求助:查询问题
窗体有一组文本框数组控件一组复选框数组控件有一个文本框且定为text1(户主姓名 )现要查询满足以text1为条件筛选出复选框选定的字段数据
代码如何编写,请各位大佬多多帮助

[此贴子已经被作者于2022-9-20 19:08编辑过]

搜索更多相关主题的帖子: 询问 控件 数组 复选框 text1 
2022-09-20 19:05
kissis
Rank: 2
等 级:论坛游民
帖 子:33
专家分:24
注 册:2022-8-21
得分:0 
大佬们能不能写个示例示范一下。另
Adodc1.RecordSource = "select * from MBDA where 户主姓名 like '%" + Trim(Text2.Text) + "'+ '%'"
现有一strCond,strCond包含了复选框所勾选的值并用,号连接,现如何把*号置换成strCond。我写的都提示至少一个参数未指定(strCond字段名称与表中名称相符)
2022-09-23 10:30
kissis
Rank: 2
等 级:论坛游民
帖 子:33
专家分:24
注 册:2022-8-21
得分:0 
回复 7楼 Fulailailai
已解决
休息了一天后重新清理了一遍思路然后查看了一下代码才发现忘了加分隔府","代码如下:
Dim strCond
For i = 0 To List1.ListCount - 1
strCond = Trim(List1.List(i))
condition1 = condition1 & strCond & ","'在这忘了加分隔府","
Next
ilen = Len(condition1)
    Adodc1.ConnectionString = adoCon
    Adodc1.RecordSource = "select " + Left(condition1, ilen - 1) + " from MBDA where 户主姓名 like '%" + Trim(Text1.Text) + "%'"
   Adodc1.Refres
2022-09-24 13:17
kissis
Rank: 2
等 级:论坛游民
帖 子:33
专家分:24
注 册:2022-8-21
得分:0 
回复 9楼 yuma
ACCESS
2022-09-24 20:15



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-510101-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.305530 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved