vb查询问题，请教高手！！！！！！

来源：百度知道 编辑：UC知道 时间：2024/05/27 03:07:23
If (Trim(Text1.Text) <> "" Or Trim(Text2.Text) <> "" Or Trim(DataCombo1.Text) <> "" Or Trim(DataCombo2.Text) <> "") Then
condstr = "学号 like '%" & (Trim(Text1.Text)) & "%' "
ElseIf (Trim(Text1.Text) = "" And Trim(Text2.Text) <> "" And Trim(DataCombo1.Text) = "" And Trim(DataCombo2.Text) = "") Then
condstr = "姓名 like '%" & (Trim(Text2.Text)) & "%' "
ElseIf (Trim(Text1.Text) = "" And Trim(Text2.Text) = "" And Trim(DataCombo1.Text) <> "" And Trim(DataCombo2.Text) = "") Then
condstr = "专业 like '%" & (Trim(DataCombo1.Text)) & "%' "
End If
为什么只能对学号进行查询，不能对其他字段进行查询！刚学vb不是很懂，说明白点！

If Trim(Text1.Text) <> "" Then
condstr = "学号 like '%" & (Trim(Text1.Text)) & "%'"
End If

If Trim(Text2.Text) <> "" Then
If condstr <> "" Then condstr = condstr & " and "
condstr = condstr & "姓名 like '%" & (Trim(Text2.Text)) & "%'"
End If

If Trim(DataCombo2.Text) = "" Then
If condstr <> "" Then condstr = condstr & " and "
condstr = condstr & "专业 like '%" & (Trim(DataCombo1.Text)) & "%'"
End If

条件判断语句有问题啊,每个条件都是一样的,应该是这样吧
If (Trim(Text1.Text) <> "" Or Trim(Text2.Text) <> "" Or Trim(DataCombo1.Text) <> "" Or Trim(DataCombo2.Text) <> "") Then
condstr = "学号 like '%" & (Trim(Text1.Text)) & "%' "
ElseIf (Trim(Text2.Text) <> ""