主题：怎样查询

谢谢执教

已搞定,代码是:

Dim cbx1 As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim cbx2 As WinForm.ComboBox = e.Form.Controls("ComboBox2")

e.Form.Controls("Table1").Table.Fill("Select '" & cbx1 .Text & "已报名" & "' As 学期,b.班级,b.学生编号,学生姓名,缴费日期,性别 From {学生基本信息} As a  inner join (Select 班级,缴费日期,学生编号 From {缴学费信息} where 学生编号  In (Select 学生编号 from {缴学费信息} where 学期 = '" & cbx1.Text & "') And 学期 = '" & cbx2.Text & "') as b on (a.学生编号 = b.学生编号)", "数据库", True)
Tables("窗口1_Table1").AutoSizeCols()