新手，如何用SQL实现查询（VB中）

'[SQL SERVER中]
1
rs.open "select * from class where [姓名]='刘浩'",cn,1,3
2
rs.open "select * from class where [姓名] like '刘%'",cn,1,3
3
rs.open "select * from class where ([姓名] like '刘%') AND ([姓别]= '女'",cn,1,3'以上是各查询语句
'接下来是将查询结果显示在list中dim i as integer,str as string
str=""
while not rs.eof 
 for i=0 to rs.fields.count-1
   str=str & rs(i).value & "  "
 next
 str=str & vbcrlf
wend
list1.additem str'注：以上代码未经测试。