2. 计算机
  3. 阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。 [说明] 设有一张学生成绩表存放在Acess数据库中，其中包括学生编号、姓名以及各科目考试成绩。下面的应用程序利用数据控件(Data)实现了对这张数据表中记录的增加

阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。 [说明] 设有一张学生成绩表存放在Acess数据库中，其中包括学生编号、姓名以及各科目考试成绩。下面的应用程序利用数据控件(Data)实现了对这张数据表中记录的增加

admin2009-02-15  47
问题 阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。
[说明]
   设有一张学生成绩表存放在Acess数据库中，其中包括学生编号、姓名以及各科目考试成绩。下面的应用程序利用数据控件(Data)实现了对这张数据表中记录的增加、删除、修改、查找和刷新操作，其中，删除一条记录后，要求界面显示下一条记录；要查找记录，首先要求用户输入学生姓名，程序查找并显示匹配的第一条记录；执行刷新操作后，要求界面显示数据表的第一条记录。程序的运行界面如下：
        
   在开发过程中，数据控件Datal与成绩数据表相连接，各文本框与数据表相应字段绑定，界面上从左到右各操作按钮分别取名为CmdAdd、CmdDelete、CmdUpdate、CmdFind、CmdRefresh和CmdClose。
[Visual Basic代码]
Private Sub CmdAdd_Click()         ’增加新记录
     Datal.Recordset.  (1)  
End Sub
Private Sub CmdDelete_Click()        ’删除记录
   Data1.Recoldset.Delele
   Data1.Recoldset.  (2)  
End Sub
Pnvate Sub CmdUpdate_Click()         ’修改记录
   Data1.Reeordset.Edit
   Data1.Recordset.Update
End Sub
Private Sub CmdFind_Click()          ’查找记录
   Dim name, search As String
   name = InputBox("请输入要查询的姓名:")
   scarch = "姓名=’" & name &"’"’
Data1.Recordset. MoveFirst
Dara1.Recordset.FindFirst scarch
    If Data1.Reeoldset.  (3)   Then
           MsgBox "姓名为" & name &"的记录未找到!"
    End If
End Sub
Private Sub CmdRefresh_Click()        ’刷新记录
           (4)  
End Sub
Private Sub CmdClose_Click()          ’退出程序
   Daral.Recordset.  (5)  
   End
End Sub
选项
答案(1) AddNew (2) MoveNext (3) NoMatch (4) Data1.Refresh (5) Close
解析 (1)增加新记录应使用AddNew方法；
(2)获取记录集的下一条记录应使用MoveNext方法；
(3)查询的结果是否为空可用NoMatch属性来判断，其值为真表示查询结果为空；
(4)当Data控件的某些属性设置发生改变，可以使用 Refresh方法打开或重新打开数据库，用Refresh方法可以更新数据控件的集合内容；
(5)关闭应用程序之前，应关闭数据库连接。
转载请注明原文地址:https://kaotiyun.com/show/YojZ777K
本试题收录于： 程序员下午应用技术考试题库软考初级分类
0

程序员下午应用技术考试

软考初级

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