请将每一个空的正确答案写在答题卡序号的横线上,答在试卷上不给分。
(1)栈底至栈顶依次存放元素A、B、C、D,在第五个元素E入栈前,栈中元素可以出栈,则出栈序列可能是【1】。
(2)在最坏情况下,堆排序需要比较的次数为【2】。
(3)已知二叉树后序遍历序列是dabec,中序遍历序列是debac,它的前序遍历序列是【3】。
(4)从工程管理角度,软件设计一般分为两步完成,它们是【4】。
(5)用二维表的形式来表示实体之间联系的数据模型叫做【5】。
(6)在学生成绩表中,如果需要根据输入的学生姓名查找学生的成绩,需要使用的是 【6】 查询。
(7)数据访问页有两种视图,它们是页视图和 【7】 视图。
(8)如果希望按满足指定条件执行宏中的一个或多个操作,这类宏称为 【8】 。
(9)某窗体中有一命令按钮,在窗体视图中单击此命令按钮打开一个报表,需要执行的宏操作是 【9】 。
(10)执行下面的程序,消息框里显示的结果是 【10】 。
Private Sub Form_Click()
Dim Str As String,k As Integer
Str="ab"
For k=Len(Str) To 1 Step -1
Str=Str & Chr(Asc(Mid(Str,k,1))+k)
Next k
MsgBox Str
End Sub
(11)在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为Text1),然后编写如下事件过程:
Private Sub Command1_Click()
Dim x As Integer, y As Integer, z As Integer
x=5:y=7:z=0
Me!Text1=""
Call p1(x,y,z)
Me!Text1=z
End Sub
Sub p1(a As Integer, b As Integer, c As Integer)
c=a+b
End Sub
打开窗体运行后,单击命令按钮,文本框中显示的内容是 【11】 。
(12)窗体中有两个命令按钮:"显示"(控件名为cmdDisplay)和"测试"(控件名为cmdTest)。以下事件过程的功能是:单击"测试"按钮时,窗体弹出一个消息框,如果单击消息框的"确定"按钮,隐藏窗体上的"显示"命令按钮;单击"取消"按钮关闭窗体。请按照功能要求,将程序补充完整。
Private Sub cmdTest_Click()
Answer = 【12】
If Answer=vbOK Then
cmdDisplay.Visible = 【13】
Else
Docmd.Close
End If
End Sub
(13)下列子过程的功能是:将当前数据库文件中"学生表"的学生"年龄"都加1。请在程序空白的地方填写适当的语句,使程序实现所需的功能:
Private Sub SetAgePlus1_Click()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim fd As DAO.Field
Set db = CurrentDb()
Set rs = db.OpenRecordset("学生表")
Set fd = rs.Fields("年龄")
Do While Not rs.EOF
rs.Edit
fd = 【14】
rs.Update
【15】
Loop
rs.Close
db.Close
Set rs = Nothing
Set db = Nothing
End Sub
相关推荐:
北京 | 天津 | 上海 | 江苏 | 山东 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
广东 | 河北 | 湖南 | 广西 | 河南 |
海南 | 湖北 | 四川 | 重庆 | 云南 |
贵州 | 西藏 | 新疆 | 陕西 | 山西 |
宁夏 | 甘肃 | 青海 | 辽宁 | 吉林 |
黑龙江 | 内蒙古 |