2. 计算机
  3. “学生成绩”表含有字段(学号，姓名，数学，外语，专业，总分)。下列程序的功能是：计算每名学生的总分(总分=数学+外语+专业)。请在程序空白处填入适当语句，使程序实现所需要的功能。 Private Sub Command1_Click() Dim cn As

“学生成绩”表含有字段(学号，姓名，数学，外语，专业，总分)。下列程序的功能是：计算每名学生的总分(总分=数学+外语+专业)。请在程序空白处填入适当语句，使程序实现所需要的功能。 Private Sub Command1_Click() Dim cn As

admin2010-04-08  59
问题 “学生成绩”表含有字段(学号，姓名，数学，外语，专业，总分)。下列程序的功能是：计算每名学生的总分(总分=数学+外语+专业)。请在程序空白处填入适当语句，使程序实现所需要的功能。
Private Sub Command1_Click()
Dim cn As New ADODB．Connection
Dim rs As New ADODB．Recordset
Dim zongfen As ADODB．Fieid
Dim shuxue As ADODB．Field
Dim waiyu As ADODB．Field
Dim zhuanye As ADODB．Field
Dim strSQL As String
Set cn=currentproj ect．Connection
strSQL=“Select*from成绩表”
rs.OpenstrSQL，cn，adOpenDynamic，adLockOptimistic，adCmdText
Set zongfen=rs．Fields(”总分”)
Set shuxue=rs．Fields(”数学”)
Set waiyu=rs．Fields(”外语”)
Set zhuanye=rs．Fields(”专业”)
Do While．【  】．
zongfen=shuxue+waiyu+zhuanye   
【  】
rs．MoveNext
Loop
rs．CloSe
cn．Close
Set rs=Nothing
Set cn=Nothing
End Sub
选项
答案Not rs．EOF,rs．Update
解析 本题考查的是对数据库的编程，主要是对记录集的操作，当记录集没有到最后一条记录时才能进行操作，每次操作后要对数据库进行更新。
转载请注明原文地址:https://kaotiyun.com/show/eOwp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)