VB组合查询语句求助
Adodc1.RecordSource = "select * from kaoqin where " & Combo2 & " = '" & Combo3 & "'"Adodc1.RefreshSet DataGrid1.DataSource = Adodc1
dim ss=""If Check1。Value = "1" Thenss = Combo1。Textss = "%%" & ss & "%%"s = " and 学历 like '" + ss + "'"End IfIf Check2。
Value = "1" Thenss = Text1。Textss = "%%" & ss & "%%"s = s &" and 姓名 like '" + ss + "'"End IfIf Check3。Value = "1" Thenss = Combo3。
Textss = "%%" & ss & "%%"s = s & " and 部门 like '" + ss + "'"End IfIf Check4。Value = "1" Thenss = Combo4。Textss = "%%" & ss & "%%"s = s & " and 性别 like '" + ss + "'"End IfAdodc1。
RecordSource = "SELECT * FROM ygxx where '1'='1' " & sAdodc1。Refresh。
思路是这样:把check和combo控件做成控件数组,然后combo(0).tag=“学历” comb0(1).tag=“姓名”,依次类推dim I as integerPrivate Sub Check_Click(Index As Integer)I=indexEnd Sub最后在“查询”单击事件中dim S as strings="select * from ygxx where "s=s & combo(i).tag & " like '" & combo(i).text & "'"Adodc1.RecordSource = sAdodc1.Refresh
答:详情>>
答:cisco网络技术是一个为CTO、IT技术经理、网络工程师、安全工程师、数据库工程师、网络管理员、系统工程师、开发工程师、项目管理人员等IT技术人员搭建的有关先...详情>>
问:有一个二百台电脑的网络,服务器只有一台,怎样将它们分成两个不同的网络,不能相互访...
答:服务器上安装2个网卡A和B 将A的Ip地址设定为 B的IP地址设置成 。 200台电脑的IP分成C、D两组设置 C组100台的IP设置为 - 网关设置成 ...详情>>