整理过的Access2010《数据库基础及应用》综合练习题

在窗体上添加一个命令按钮（名为 cmd2）,然后编写如下事件过程： Private Sub cmd2_Click() Dim pi As Single, n As Integer pi = 3.14

n = Len(Str(pi) & Space(2) & \是本字符串长度\ MsgBox n End Sub

打开窗体运行后，单击命令按钮，消息框中的输出内容是______。 A．11 B．12 C．13 D．14

答案: D

第24 题: (单选题, 1 分)

在窗体上添加一个命令按钮（名为 cmd13）,然后编写如下事件过程： Private Sub cmd13_Click() Dim x As String, y As String

x = \龙洞华美路中山大学新华学院法学院\ y = \级法学专业学生\

MsgBox Mid(x,6,4) & Right(x,3) & Left(y,9) End Sub

打开窗体运行后，单击命令按钮，消息框中的输出内容是______。 A．龙洞华美路中山大学新华学院法学院2006级法学专业学生 B．中山大学新华学院法学院2006级法学专业学生

// C．中山大学法学院2006级法学专业学生 D．中山大学法学院2006级法学专业

答案: D

第25 题: (单选题, 1 分)

下列程序段,建立如图所示的数组d（下标从1开始），填写所缺部分： 1 2 3 4 5 6 2 1 2 3 4 5 3 2 1 2 3 4 4 3 2 1 2 3 5 4 3 2 1 2 6 5 4 3 2 1

Dim d(1 To 6, 1 To 6) For j = 1 To 6 For k = 1 To 6

d(j,k) = Abs( _____ ) + 1 '选答案 Next k Next j

A．j B．j-k+1 C．j-k D．2*j-k 答案: C

第26 题: (多选题, 1 分)

// 下面______是合法的变量名。

A．STR-NAME B．Case C．FOR_99 D．abc2006 E．6A

答案: CD

第27 题: (多选题, 1 分)

在 VBA 中，对于 Sub (或 Function) 过程中的每一个形参,可用于声 明其参数传递方式的关键字包括_______。

A．ByMeB B．ByVal C．ByRef D．ByVBA E．BySub 答案: BC

第28 题: (单选题, 1 分)

在窗体上添加一个命令按钮（名为 cmd），然后编写如下事件过程。 单击该命令按钮，便将数组 p(6,8)中各个元素都赋予其对应的两个下 标值平方之和，请完善程序。 Private Sub cmd_Click()

Dim p(6,8) As integer, i As integer, j As integer For i=0 To 6 For j=0 To 8

p(i,j) = _________ '选答案 Next j Next i End Sub

A. (i+j)^2 B. i^2+j C. i+j^2 D. i^2+j^2

// 答案: D

第29 题: (单选题, 1 分)

在窗体上已经建立1个文本框控件txt1和1个命令按钮控件cmd1。请完 善程序，使之完成以下操作：

程序运行时，文本框上显示“VBA程序设计”，命令按钮的标题上显示“隐藏”； 单击命令按钮时文本框消失； 单击窗体时显示出文本框。 Private Sub cmd1_Clic() txt1.Visible = False End Sub

Private Sub Form_Click()

txt1._________ = True '选答案 End Sub

Private Sub Form_Load() txt1.Value = \程序设计\ txt1.Visible = True

cmd1.Caption = \隐藏\ End Sub

A. Enable B. Value C. Visible 答案: C

第30 题: (单选题, 1 分)

D. Caption //