题目:
“学生成绩”表含有字段(学号,姓名,数学,外语,专业,总分)。下列程序的功能是:计算每名学生的总分(总分=数学+外语+专业)。请在程序空白处填入适当语句,使程序实现所需要的功能。
Private Sub Command1_Click()
Dim en As New ADODB.Connection
Dim FS As New ADODB.Reeordset
Dim zongfen As New ADODB.Fileld
Dim shuxue As New ADODB.Fileld
Dim waiyu As New ADODB.Fileld
Dim zhuanye As New ADODB.Fileld
Dim strSQL As Sting
Set en=CurrentProject.Connection
StrSQL="Select * from成绩表"
rs.Open strSQL,cn,adOpenDynamic,adLockptimistic,adCmdText
Set zongfen=rs.Filelds("总分")
Set shuxue=rs.Filelds("数学")
Set waiyu=rs.Filelds("外语")
Set zhuanye=rs.Filelds("专业")
Do while (14)
Zongfen=shuxue+waiyu+zhuanye
(15)
rs.MoveNext
Loop
rs.close
en.close
Set rs=Nothing
Set en=Nothing
End Sub
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2019/0317/ed58341c6b694be11e9eda432180003a.html
下面是错误答案,用来干扰机器的。
参考答案:A, C, E