呃，没看懂你说的三个是什么意思。是不是这样？
有证已缴：同一学期，有证同时缴学费？
Dim cbx1 As WinForm.ComboBox = e.Form.Controls("学期")
e.Form.Controls("Table1").Table.Fill("Select '" & cbx1 .Text & "有证已缴" & "' As 学期, a.班级, a.学生编号, a.学生姓名, 性别, 民族, 家长姓名 From ({缴学费信息} As a inner join {学生缴证信息} As b on (a.学生编号 = b.学生编号 and a.学期 = '" & cbx1.Text & "' and b.学期 = '" & cbx1.Text & "')) inner join {学生基本信息} As c on(a.学生编号 = c.学生编号)", True)
有证没缴：同一学期，有证但没交学费？
Dim cbx1 As WinForm.ComboBox = e.Form.Controls("学期")
e.Form.Controls("Table1").Table.Fill("Select '" & cbx1 .Text & "有证没缴" & "' As 学期, 班级, b.学生编号, b.学生姓名,性别,民族,家长姓名 from (Select b.班级, b.学生编号, b.学生姓名, 家长姓名 From ({缴学费信息} As a right join {学生缴证信息} As b on (a.学生编号 = b.学生编号 And a.学期 = '" & cbx1.Text & "' and b.学期 = '" & cbx1.Text & "')) where a.学生编号 is null) as c inner join {学生基本信息} as d on (c.学生编号 = d.学生编号)", True)
新缴：指的是新增缴费的，还是新增缴证的？
加好友 
发短信
Post By：2014/2/25 20:36:00 [显示全部帖子]
