阅读以下说明及Visual Basic程序代码,高尔夫球应填入(n)处的字句写在对应栏内。 [说明] 设某单位Acess数据库中有一张员工信息表,其中记录了员工编号、姓名、性别等基本信息。下面的应用用数据控件(Data)实现了对这张表中记录的增加、删除和修改操作。其运行界面如下: 在开发过程中,数据控件Data1与员工数据表相连接,各文本框、“性别”组合列表框Combo1、“政治面貌”组合列表框Combo2都分别与数据表的相应字段绑定,界面上从左到右各操作按钮分别取名为CmdAdd、CmdDel、CmdUpdate和CmdExit。 [Visual Basic代码] Private Sub Form_Load( ) ' 加载窗体 Combo1. (1) '男' Combo1. (1) '女' Combo2. (1) '党员' Combo2. (1) '团员' Combo2. (1) '群众' End Sub Private Sub CmdAdd_Cliek( ) '增加记录 Datal. Recordset. AddNew End Sub Private Sub CmdDel_Click( ) '删除记录 Datal. Recordset. (2) Datal. Recordset. MoveNext End Sub Private Sub CmdUpdate_Click( ) '修改记录 If Datal. ReadOnly = (3) And Datal. Recordset. Updatable Then Datal. Recordset. Edit Datal. Recordset. (4) Else MsgBox '数据表不允许修改!' End If End Sub Private Sub CmdExit_Click ( ) '退出程序 Dim ret As Long ret : MsgBox('真的要退出吗?', vbQuestion + vbYesNo, '退出' ) If (5) Then Datal. Reeordset. Close End End ff End Sub