Question

在vb中根据指定的查询条件查询ACCESS数据库中符合条件的记录，查询结果在LISTLIEW控件中显示

Answer 1

select * from 表名 where 要筛选的字段=值

追问

我自己在数据库建了表：学生信息表。包括字段：学号、姓名、联系方式、班级、所在系部。要实现的界面如下：单击查询后，结果在listliew中显示，代码应该怎么写啊，需要具体的代码

追答

你图片中的两个参数之间是或关系还是与关系呢？这些都要说明清楚呀
dim TmpSQL as string
dim SQL as string
sql="select * from 学生信息表"
if len(trim(text1.text))>0 and len(trim(text2.text))>0 then
tmpsql="所在系部='" & trim(text1.text) & "' and 所在班级='" & trim(text2.text) & "'"
else
if len(trim(text1.text))>0 then tmpsql="所在系部='" & trim(text1.text) & "'"
if len(trim(text2.text))>0 then tmpsql="所在班级='" & trim(text2.text) & "'"
endif
sql=sql & " " & tmpsql

追问

是或的关系，我试着运行了没反应啊

追答

你的代码呢？

追问

Private Sub Cmd81_Click()

Dim SQL As String
Dim TmpSQL As String
SQL = "select * from 表3：学生基本信息 " & TmpSQL
TmpSQL = "where 1 = 1" & TmpSQL
If Text81.Text "" Then
TmpSQL = " and 所在系部='" & Text81.Text & "'"
End If
If Text82.Text "" Then
TmpSQL = " and 班级='" & Text82.Text & "'"
End If
End Sub

追答

TmpSQL = "where 1 = 1" & TmpSQL，你这=号两边的1是什么意思？调试时没报错吗？