SQL语句用select写程序

1

select a.系名,sum(case when a.系号=b.系号 then 1 else 0 end) 人数

from 系信息表 a left join 学生信息表 b on a.系号=b.系号

group by a.系名

2

select a.系名,count(*) 人数

from 系信息表 a inner join 学生信息表 b on a.系号=b.系号

group by a.系名

Select Case 语句，根据表达式的值，来决定执行几组语句中的其中之一。

Select Case 语句示例

本示例使用 Select Case 语句来判断变量的值。示例中第二个 Case

子句包含了变量值，故只有此区块内的语句会被完成到。

    Dim Number

    Number = 8   ' 设置变量初值。

    Select Case Number   ' 判断 Number 的值。

        Case 1 To 5   ' Number 的值在 1 到 5 之间，包含1 和 5 。

            Debug.Print "Between 1 and 5"

        ' 下一个 Case 子句是本示例中唯一判断值为 True 的子句。

        Case 6, 7, 8   ' Number 的值在 6 到 8 之间。

            Debug.Print "Between 6 and 8"

        Case 9 To 10   ' Number 的值为 9 或 10。

        Debug.Print "Greater than 8"

        Case Else   ' 其他数值。

            Debug.Print "Not between 1 and 10"

    End Select

---