首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下应用说明及Visual Basic部分程序代码,将应填入(n)处的字句写在答题纸的对应栏内。 应用说明 设一个简单的“通讯录”存储在一个ACCESS类型的数据库表中,包括姓名、电话和email三个字段。下面的应用程序实现对“通讯录”数据库表中
阅读以下应用说明及Visual Basic部分程序代码,将应填入(n)处的字句写在答题纸的对应栏内。 应用说明 设一个简单的“通讯录”存储在一个ACCESS类型的数据库表中,包括姓名、电话和email三个字段。下面的应用程序实现对“通讯录”数据库表中
admin
2007-03-15
105
问题
阅读以下应用说明及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 ’“修改”和“取消”按钮的程序代码(略)
选项
答案
(1)False (2)True (3)SetFocus (4)Delete (5)Update
解析
本题考查的是Visual Basic的文本框、命令按钮等基本控件和基本数据控件的使用。
程序代码中自定义过程enableop()的作用是集中设置窗体中文本框和命令按钮的 Enabled属性。
窗体装载事件的代码如下:
Private Sub Form_Load()
Call enableop(False)
Datal.Refresh
If Datal.Recordset.RecordCount=0 Then
Cmd_del.Enabled=False: Cmd_modify.Enabled= (1)
End If
End Sub
其中,调用enableop(False)使得各文本框的数据不可修改,同时“确定”和“取消”按钮不可操作,因为这两个按钮是为了确认增加、删除、修改操作而设置的。当数据控件Datal绑定后,Datal.Recordset.RecordCount表示数据表中的记录数目,当数据表为空时,自然也不能进行删除和修改操作,所以空(1)处应填入“False”。
单击“增加”按钮事件的代码如下:
Private Sub Cmd add Click() ’单击“增加”按钮的代码
Call enableop( (2) )
Daml.Recordset.AddNew ’在数据库表中添加一个新记录
Txt_name. (3)
End Sub
当单击“增加”按钮时,表示要在数据表中增加一条记录。题目要求在按下“增加”或“修改”后方可以编辑记录内容,同时“增加”、“删除”、“修改”和“退出”按钮变为不可操作状态,所以通过查看enableop()中对各控件Enabled属性的设置,很容易得知空(2)处应填入“True”。当通过“Datal.Recordset.AddNew”在数据表添加一条新记录后,下面的任务就是在相应的绑定控件中输入数据,因此接下来应将焦点设置到文本框 Txt name以等待用户输入,所以空(3)应填入“SetFocus”。
显然,“删除”按钮实现的是删除一条记录的操作,因此,从空(4)所在语句的上下文中可知此处应填入“Delete”。
下面查看“确定”按钮的单击事件代码。
Private Sub Cmd ok Click() ’单击“确定”按钮的代码
On Error Go To errorl
Datal.Recordset. (5)
Call enableop(False)
Exit Sub
errorl:
MsgBox Err.Description,vbOKOnly,"错误提示!"
Datal.UpdateControls
Callenableop(False)
EndSub
从题干的描述部分可知,只有增加、修改记录操作后才会用到“确定”按钮,因此“确定”按钮的作用是对这两个操作提交的数据进行更新,所以空(5)处应填入“Update”。
转载请注明原文地址:https://kaotiyun.com/show/vzjZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
下列选项中,______不属于Access中窗体的数据来源。
把数据从本地计算机传送到远程主机称为______。
在数据通信过程中,将模拟信号还原为数字信号的过程称为______。
Windows系统的文件夹组织结构足一种(31)。
在Excel中,用&运算符进行运算时,其运算对象的类型应为______。
在Word的编辑状态下,文档窗口显示水平标尺,则当前的视图方式______。
关于Word中的多文档窗口操作,下列叙述中,不正确的是(48)。
为查看Windows系统当前正在运行哪些应用程序或进程,可用(43)组合键实现。
在Excel的A1单元格中输入函数“=LEFT(“信息处理技术员”,2)”,按回车键后,A1单元格中的值为()。
在Excel中,绝对地址在被复制或移动到其他单元格时,其单元格地址______。
随机试题
某区将体育馆装修改建成娱乐中心对外营业,根据我国《环境噪声污染防治法》的规定,该娱乐中心发出的噪声属于【】
__________和__________是一种以创造或扩展谈判的可能性协议空间,从而寻求增大谈判力的能力。
孕妇感染风疹病毒早期诊断常用的诊断方法有
二级公路土方路基路床压实度规定值为()。
在一定温度下,下列反应的Kp与Kc之间的关系正确的是()。
合理确定建设工程项目投资的基础是()。
一般资料:求助者,女性,17岁,高中二年级学生。案例介绍:求助者上中学后不知什么原因出现了挤眼睛的习惯,受到父母亲的训斥。自己也认为一个女孩子挤眉弄眼很不好,但做了很多努力,没有明显效果,主动前来寻求帮助。下面是咨询师与求助者之间的一段
(2017·山西)儿童自我意识与自我教育能力的发展大致从自我为中心发展到“自律”,再从“自律”发展到“他律”。()
某班同学要订A、B、C、D四种学习报,每人至少订一种,最多订四种,那么每个同学有多少种不同的订报方式?()
Amongalltheanimals,theapeismostlikehumanbeings.Bothpeopleandapeshavethesimilarbrainstructure,thesimilarner
最新回复
(
0
)