有一个“学生－课程”数据库，数据库中包括三个表： (1) “学生”表S由学号（Sno）、姓名（Sname）、性别

Question

有一个“学生－课程”数据库，数据库中包括三个表：
(1) “学生”表S由学号（Sno）、姓名（Sname）、性别（Ssex）、年龄（Sage）、所在系（Sdept）五个属性组成，可记为： S(Sno,Sname,Ssex,Sage,Sdept) Sno 为关键字。
(2) “课程”表C由课程号（Cno）、课程名（Cname）、先修课号（Cpno）、学分（Ccredit）四个属性组成，可记为： C(Cno,Cname,Cpno,Ccredit) Cno为关键字。
(3) “学生选课”表SC由学号（Sno）、课程号（Cno）、成绩（Grade）三个属性组成，可记为： SC(Sno,Cno,Grade) (SNO, CNO) 为关键字。
1． USE 学生－课程
GO
DECLARE Student SCROLL CURSOR
FOR SELECT S.Sno, S.Sname, SC.Grade
FROM S,SC,C
WHERE S.Sno=SC.Sno AND C.Cno=SC.Cno AND
S.Sdept=’计算机系’ And C.Cname=’数据库基础与应用’
ORDER BY S.Sno
FOR READ ONLY
GO
请写出上述程序的功能。

2． USE 学生－课程
GO
DECLARE @S_Sdept varchar(20), @S_avg int
SET @S_Sdept =’信息工程系’
SELECT @S_avg=AVG(Sage)
FROM S
WHERE Sno= @S_Sno
PRINT @S_avg
GO
请写出上述程序的功能。

3． DECLARE @x int, @s int
SET @s=1
SET @x=1
WHERE @x<20
BEGIN
SET @s=@s+@x
SET @x=@x+@s
END
PRINT ‘s=’+cover(chr(4),@s)
PRINT ‘x=’+cover(chr(4),@x)
请写出上述程序执行后的结果。

4． Private Sub Form_Load()
If Check1.Value=0 Then
DataGrid1.AllowDelete=False
DataGrid1.AllowAddNew=true
End If
End Sub
请写出上述过程的功能。
急着要答案 希望有人帮忙

Answer 1

1）查出“计算机系”选课有“数据库基础与应用”学生的学号，姓名，成绩，按照学号升序显示
2）“信息工程系”学生的（avg）平均年龄，并打印结果。其中WHERE Sno= @S_Sno条件，没有定义@S_Sno怎么就给这个学号赋值了呢？
3）s=13
x=21
4）窗体加载时，Check1应该是一个控件名，当他的calue为0的时候。DataGrid数据控件允许删除功能，可以添加新信息（AllowAddNew不太确定，没有见过）本回答被提问者和网友采纳

Answer 2

1.从库中查询计算机系选修数据库基础与应用的学生的学号、姓名、成绩，按学号递增排序，存入游标Student中，只读。
2.查询信息工程系学生的年龄。
3.cover的这个啥没学过就帮不上忙了~等待高人吧
4.（貌似）如果读取的数值为0，则不允许删除且允许定义新值

PS：不是很肯定，你可以再参考下其他人的答案~

Answer 3

1.定义一个游标
查出计算机系课程名为数据库基础与应用学生的学号，姓名，成绩
2.求出信息工程系学生的平均年龄 AVG求平均函数
3.s=13
x=21
4.少信息吧。。。。。 这个是个判断 求False True的