在数据访问页中修改记录时,若要取消当前字段的修改,可以使用的按键是()。A.TabB.DelC.BackSpace键
在数据访问页中修改记录时,若要取消当前字段的修改,可以使用的按键是()。
A.Tab
B.Del
C.BackSpace键
D.Esc键
在数据访问页中修改记录时,若要取消当前字段的修改,可以使用的按键是()。
A.Tab
B.Del
C.BackSpace键
D.Esc键
A.
B.
C.BackSpace键
D.Esc键
下面关于数据访问页的叙述中,错误的是()。
A.数据绑定的页显示的是当前数据
B.可以通过电子邮件进行分发
C.用户可以筛选、排序并查看所需的数据
D.收件人打开邮件时看到的是过去的数据
Access所设计的数据访问页是一个()。
A. 独立的外部文件
B. 独立的数据库文件
C. 在数据库文件中的文件
D. 数据库记录的超链接
A.数据绑定的页显示的是当前数据
B.用户可以筛选、排序并查看所需的数据
C.可以通过使用电子邮件进行分发
D.收件人打开邮件时看到的是过去的数据
A.数据访问页不是Access数据库的一种对象
B.数据访问页与其他Access数据库对象的性质不同
C.数据访问页的创建和修改方式与其他Access数据库对象基本上是一致的
D.数据访问页与Access数据库无关
下列对数据访问页与Access数据库的关系的描述中正确的是()。
A.数据访问页不是Access数据库的一种对象
B.数据访问页与其他Access数据库对象的性质不同
C.数据访问页的创建和修改方式与其他Access数据库对象基本上是一致的
D.数据访问页与Access数据库无关
阅读以下应用说明及Visual Basic部分程序代码,将应填入(n)处的字句写在答题纸的对应栏内。
应用说明
设一个简单的“通讯录”存储在一个ACCESS类型的数据库表中,包括姓名、电话和email三个字段。下面的应用程序实现对“通讯录”数据库表中的记录进行增加、删除及修改处理,其运行界面如下:
(1)数据控件(datal)与“通讯录”数据库表相连接,用户可通过“”和“”按钮指定表中的当前记录。
(2)文本框Txt name、Txt phone和Txt email分别与数据库表中的“姓名”、“电话”和“email”字段绑定,用于显示当前记录的内容。
(3)应用程序启动时,“确定”按钮(Cmd ok)和“取消”按钮(Cmd cancel)不可操作,文本框中显示表中的第一条记录,这时文本框处于不可操作状态。
(4)单击“增加”按钮(Cmd_add)或“修改”按钮(Cmd_modify)后,方可以编辑记录内容,同时“增加”、“删除”、“修改”和“退出”按钮变为不可操作状态。“增加”和“修改”操作需通过“确定”和“取消”按钮确认。
(5)单击“删除”按钮(Cmd del)后,弹出对话框,再单击“确定”按钮,当前记录被删除。
程序代码
Private Sub enableop(isEnabled As Boolean)
Txt_name.Enabled=isEnabled: Txt_phone.Enabled=isEnabled
Txt_email.Enabled=isEnabled
Cmd_ok.Enabled=isEnabled: Cmd_eancel.Enabled=isEnabled
Cmd_add.Enabled=Not isEnabled: Cmd_del.Enabled=Not isEnabled
Cmd_end.Enabled=Not isEnabled: Cmd_modify.Enabled=Not isEnabled
EndSub
Private Sub Form_Load()
Call enableop(False)
Data1.Refresh
If Data1 .Recordset. RecordCount = 0 Then
Cmd_del. Enabled= False: Cmd_modify. Enabled=(1)
End If End Sub Private Sub Cmd_add_Cliek() '单击“增加”按钮的代码
Call enableop((2) )
Datal .Recordset. AddNew '在数据库表中添加一个新记录
Txt name. (3) End Sub Private Sub Crud_del_Click() '单击“删除”按钮的代码
On Error GoTo error3
arts = MsgBox("确定删除吗?", vbYesNo + vblnformafion, "操作提示!")
If (ans = vbYes) Then
Datal.Recordset. (4)
Datal .Recordset. MoveNext
If Datal .Recordset. EOF Then Data l.Refiesh
End If
Exit Sub error3:
MsgBox Err. Description, vbOKOnly, "错误提示!" End Sub Private Sub Cmd_ok_Click() '单击“确定”按钮的代码
On Error GoTo errorl
Datal.Recordset. (5)
Call enableop(False)
Exit Sub error 1:
MsgBox Err. Description, vbOKOnly, "错误提示!"
Datal.UpdateControls
Call enableop(False) End Sub '“修改”和“取消”按钮的程序代码(略)