access复习资料 下载本文

Access数据库应用技术

sir3的返回值是( )。

A hel B loworld C rld D hellowo 参考答案C

397 运行下面的程序段: For k=5 to 10 Step 2 k=k*2 Next k

则循环次数为( )。 A 1 B 2 C 3 D 5 参考答案A 398 程序段: x=0

For i=1 to 10 step 2 x=x+i i=i*2 Next i

当循环结束后,变量i的值为( )。 A 22 B 10 C 11 D 16 参考答案A 402 程序段:

Str=“计算机科学技术” Str=Mid(str,3,2) Str的返回值是( )。

A 计算机科学 B 机科学技术 C 机科 D 科学 参考答案C

406 VBA中定义符号常量可以用关键字( )。 A Const B Dim C Public D Static 参考答案A 407 已知程序段: S=0

For I=1 to 10 step 2 S=S+1 I=I*2 Next I

当循环结束后变量I,S的值分别为( )。 A 22,3 B 11,4 C 10,5 D 16,6 参考答案A

410 VBA中用实际参数a和 b调用有参函数过程 Area(m,n)的正确形式是(A Area m,n B Area a,b C Call Area(m,n) D Call Area a,b 参考答案B

414 VBA数据类型符号 “&”表示的数据类型是( ) A 整数 B 长整数 C 单精度数 D 双精度数 参考答案B

420 下列算式正确的是( )。 A Int(2.5)=3 B Int(2.5)=2 C Int(2.5)=25 D Int(2.5)=0.5 参考答案B

VBA数据库编程

31 在Access中,DAO的含义是

37

)。 Access数据库应用技术

A 开放数据库互连应用编程接口 B 数据库访问对象

C Active数据对象 D 数据库动态链接库 参考答案B 67 ADO 的含义是

A 开放数据库互连应用编程接口 B 数据库访问对象 C 动态链接库 D Active 数据对象 参考答案D

104 在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0到100分之间,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。run35命令按钮的Click的事件代码如下: Private Sub run35_Click( ) Dim flag As Boolcan result=0 flag=True Do While flag

result=Val(InputBox(\请输入学生成绩:\输入\ If result>=0 And result <=100 Then ___________ Else

MsgBox \成绩输入错误,请重新输入\ End If Loop

Rem 成绩输入正确后的程序代码略 End Sub

程序中有一空白处,需要填入一条语句使程序完成其功能。下列选项中错误的语句是 A flag=False B flag=Not flag C flag=True D Exit Do 参考答案C

133 在VBA中要打开名为“学生信息录入”的窗体,应使用的语句是 A DoCmd.OpenForm “学生信息录入” B OpenForm “学生信息录入”

C DoCmd.OpenWindows “学生信息录入” D OpenWindows “学生信息录入” 参考答案A

139 在窗体中添加一个名称为Command1 的命令按钮,然后编写如下事件代码:

Public Function f (m As Integer)As Integer Do while m<>n Do While m>n m=m-n Loop Do While m

38

Access数据库应用技术

End Function

窗体打开运行后,单击命令按钮,则消息框的输出结果是 A 2 B 4 C 6 D 8 参考答案C

165 窗体中有3个命令按钮,分别命名为Command1、Command2和 Command3。当单击Command1按钮时,Command2按钮变为可用,Command3按钮变为不可见。下列Command1的单击事件过程中,正确的是 A private sub Command1_Click() Command2.Visible = true Command3.Visible = false B private sub Command1_Click() Command2.Enable = true Command3.Enable = false C private sub Command1_Click() Command2.Enable = true Command3.Visible = false D private sub Command1_Click() Command2.Visible = true Command3.Enable = false 参考答案C

174 下列过程的功能是:通过对象变量返回当前窗体的Recordset属性记录集引用,消息框中输出记录集的记录(即窗体记录源)个数。 Sub GetRecNum( ) Dim rs As Object Set rs = Me.Recordset MsgBox----- End Sub

程序空白处应填写的是 A Count B rs.Count C RecordCount D rs. RecordCount 参考答案D

201 能够实现从指定记录集里检索特定字段值的函数是 A Nz B Find C Lookup D DLookup 参考答案 D

209 下列程序段的功能是实现“学生”表中“年龄”字段值加1 Dim Str As String Str=\

Docmd.RunSQL Str

空白处应填入的程序代码是

A 年龄=年龄+1 B Update学生 Set 年龄=年龄+1 C Set 年龄=年龄+1 D Edit 学生 年龄=年龄+l 参考答案B

244 运行下列程序,输入数据8, 9, 3, 0后,窗体中显示结果是 Private Sub Form _click() Dim sum AsInteger,m As Integer sum=0 Do

m=InputBox(“输入m”) sum=sum+m Loop Until m=0 MsgBox sum

39

Access数据库应用技术

End Sub

A 0 B 17 C 20 D 21 参考答案C

40