End Sub
打开窗体运行后,单击命令按钮,立即窗口上输出的结果是 A)2 32 B)12 3 C)2 2 D)12 32
注:参数有两种传递方式:传址传递ByRef和传值传递ByVal。如果没有说明传递类型,则默认为传址传递。在函数Proc(n as integer,ByVal m as integer)参数中,形参n默认为传址传递,形参的变化将会返回到实参,即形参n mod 10得到的结果2将返回给实参x,即x=2;而y为传值类型,不为形参的变化而变化。
34)在窗体上有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl_Click() Dim d1 As Date Dim d2 As Date dl = #12/25/2009# d2 = #1/5/2010#
MsgBox DateDiff(” ww”, d1, d2) End Sub
打开窗体运行后,单击命令按钮,消息框中输出的结果是 A)1 B)2 C)10 D)11
注:datediff表示两个指定日期间的间隔数目,参数ww要求返回值为两日期间的周数。
(35)下列程序段的功能是实现“学生”表中“年龄”字段值加1 Dim Str As String Str=\
Docmd.RunSQL Str
空白处应填入的程序代码是
A)年龄=年龄+1 B)Update学生 Set 年龄=年龄+1 C)Set 年龄=年龄+1 D)Edit 学生 年龄=年龄+l
注:实现字段值的增加用update更新语句,语句格式为:update 表名 set 字段名=表达式。
二、填空题(每空2分,共30分)
请将每一个空的正确答案写在答题卡【l】~【15】序号的横线上,答在试卷上不得分。
(1)一个队列的初始状态为空。现将元素A,B,C,D,E,F,5,4,3,2,1依次入队,然后再依次退队,则元素退队的顺序为 【1】 。
注:队列是先进先出的数据结构,所以出队列的顺序与进队列的顺序一致。
(2)设某循环队列的容量为50,如果头指针front=45(指向队头元素的前一位置),尾指针rear=10(指向队尾元素),则该循环队列中共有 【2】 个元素。
注:计算队列中的元素个数的公式为:(rear-front+maxqsize)%maxqsize,其中maxqsize为队列的容量。
(3)设二叉树如下:
对该二叉树进行后序遍历的结果为 【3】 。 (4)软件是 【4】 、数据和文档的集合。(第8页)
(5)有一个学生选课的关系,其中学生的关系模式为:学生(学号,姓名,班级,年龄),课程的关系模式为:课程(课号,课程名,学时),其中两个关系模式的键分别是学号和课号,则关系模式选课可定义为:选课(学号, 【5】 ,成绩)。
(6)下图所示的窗体上有一个命令按钮(名称为Command1)和一个选项组(名称为Framel),选项组上显示“Framel”文本的标签控件名称为Labell,若将选项组上显示文本“Frame1”改为汉字“性别”,应使用的语句是【6】。(第303页)
(7)在当前窗体上,若要实现将焦点移动到指定控件,应使用的宏操作命令是【7】。
(8)使用向导创建数据访问页时,在确定分组级别步骤中最多可设置【8】个分组字段。
(9)在窗体文本框Text l中输入“456AbC”后,立即窗口上输出的结果是【9】。
Private Sub Textl_KeyPress(KeyAscii As Integer) Select Case DeyAscii Case 97 To 122
Debug.Print Ucase(Chr(KeyAscii)); Case 65 To 90
Debug.Print Lcase(Chr(KeyAscii)); Case 48 To 57
Debug.Print Chr(KeyAscii); Case Else KeyAscii = 0 End Select End Sub
注:ascii码为97-122的为小写字母a-z;65-90为大写字母A-Z;48-57为数字0-9.本程序的作用是将大写字符转换为小写字符,小写字符转换为大写字符,数字字符原样输出。
(10)在窗体上有一个命令按钮Commandl,编写事件代码如下: Private Sub Command1_Click() Dim a(10), p(3) As Integer k = 5
For i = 1 To 10 a(i) = i * i Next i
For i = 1 To 3 p(i) = a(i * i)