求助：查询问题 - 编程论坛

#2

yuma2022-09-20 20:06

这个有点难，建议到网上下载源码。

#3

suzhanpeng2022-09-21 10:44

遍历数组

#4

apull2022-09-21 11:40

遍历数组，拼接查询字符串。

#5

kissis2022-09-23 10:30

大佬们能不能写个示例示范一下。另
Adodc1.RecordSource = "select * from MBDA where 户主姓名 like '%" + Trim(Text2.Text) + "'+ '%'"
现有一strCond，strCond包含了复选框所勾选的值并用,号连接，现如何把*号置换成strCond。我写的都提示至少一个参数未指定（strCond字段名称与表中名称相符）

#6

cwa99582022-09-24 09:48

你的这问题太笼统，你用什么数据，具体有些什么字段，要说明清楚。放上你的相关代码。

Adodc1.RecordSource = "select * from MBDA where 户主姓名 like +'%'+'" + Trim(Text2.Text) + "'+'%'"
如果strCond是字段名，可以直接替换 * ，但是查询结果会只有这一列

#7

Fulailailai2022-09-24 12:38

遍历数组

#8

kissis2022-09-24 13:17

回复 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

#9

yuma2022-09-24 17:47

回复 8楼 kissis

你这个是操作的mysql数据库是吗？

#10

kissis2022-09-24 20:15

回复 9楼 yuma

ACCESS