单项选择题

下面过程运行之后，则变量J的值为
Private Sub Fun( )
Dim JAs Integer
J=5
Do
J=J+2
Loop While J＞10
End Sub

A．5
B．7
C．9
D．11

你可能感兴趣的试题

单项选择题

单击窗体上Command1命令按钮时，执行如下事件过程
Private Sub Command1_Click( )
a$="software and hardware"
b$=Right(a$，8)
c$=Mid(a$，1，8)
MsgBox a$，b$，c$，1
End Sub
则在弹出的信息框的标题栏中显示的信息是

A．software and hardware
B．software
C．hardware
D．1

单项选择题

给定13期DD，可以计算该日当前月最大天数的正确表达式是

A．Day(DＤ)
B．Day(DateSerial(Year(DＤ)，Month(DＤ)，Day(DＤ)))
C．Day(DateSerial(Year(DO)，Month(DＤ)，0))
D．Day(DateSerial(Year(DＤ)，Month(DＤ)+1，0))

单项选择题

表达式("周"＜"刘")返回的值是

A．False
B．True
C．-1
D．1

单项选择题

以下内容中不属于VBA提供的数据验证函数是

A．IsText
B．IsDate
C．IsNumeric
D．IsNull

单项选择题

连接式"2+3"&"="&(2+3)的运算结果为

A．"2+3=2+3"
B．"2+3=5"
C．"5=5"
D．"5=2+3"

单项选择题

VBA中用实际参数a和b调用有参函数过程Area(m，n)的正确形式是

A．Area m，n
B．Area a，b
C．Call Area(m，n)
D．Call Area a，b

单项选择题

VBA表达式DateSerial(2004-1，8-2，0)返回的值是

A．2004-5-31
B．2004.5.31
C．2003.5.31
D．2003-6-1

单项选择题

以下关于过程和过程参数的描述中，错误的是

A．过程的参数可以是控件名称
B．用数组作为过程的参数时，使用的是“传址”方式
C．只有函数过程能够将过程中处理的信息传回到调用的程序中
D．窗体可以作为过程的参数

单项选择题

如图8-2所示的为VBE界面的“代码”窗口，其中圈出的部分为

单项选择题

在日期/时间数据类型中，每个字段需要几个字节的存储空间

A．4
B．8
C．12
D．16

单项选择题

VBA中定义符号常量可以用关键字

A．Const
B．Dim
C．Public
D．Static

单项选择题

下面程序段执行的结果是
Dim i As Integer，S As Integer
S=0
For i=1 to 10 step 1
S=S+i
Next i

A．S=0
B．S=10
C．死循环
D．S=55

单项选择题

VBA的逻辑值进行算术运算时，True值被当做

A．0
B．-1
C．1
D．任意值

单项选择题

VBA中定义局部变量可以用关键字

A．Const
B．Dim
C．Public
D．Staffc

单项选择题

下面表达式为假的是

A．(4＞3)
B．((4 Or(3＞2))=1)
C．((4 And(3＜2))=1)
D．(Not(3＞=4))

单项选择题

设有如下的记录类型
Type student
Number As String
Name As String
Age As Integer
End Type
则正确引用该记录类型变量的代码是

A．Student.name="张红"
B．Dim s As Student s.name="张红"
C．Dim S As Type Student s.name="张红"
D．Dim s As Type s.name="张红"

单项选择题

已定义好有参函数f(m)，其中形参m是整型变量。下面调用该函数，传递实参为5，将返回的函数值赋值给变量t。
以下正确的是

A．t=f(m)
B．t=Call f(m)
C．t=f(5)
D．t=Call f(5)

单项选择题

ADO对象模型中可以打开RecordSet对象的是

A．只能是Connection对象
B．只能是Command对象
C．可以是Connection对象和Command对象
D．不存在

单项选择题

VBA中不能进行错误处理的语句结构是

A．On Error Then标号
B．On Error GoTo标号
C．On Error Resume Next
D．On Error GoTo

单项选择题

能够实现从指定记录集里检索特定字段值的函数是

A．Nz
B．DSum
C．DLookup
D．Rnd

单项选择题

VBA表达式If(0，20，30)的值为

A．20
B．30
C．25
D．10

单项选择题

函数Right(Left(Mid("Access DataBase"，10，3)，2)，1)返回的值是

A．t
B．空格
C．a
D．B

单项选择题

属于Access系统内部常量的是

A．0
B．1
C．Not
D．On

单项选择题

下面过程运行之后，则变量J的值为
Private Sub Fun( )
Dim J As Integer
J=2
Do
J=J*3
Loop While J＜15
End Sub

A．2
B．6
C．15
D．18

单项选择题

在有参函数设计时，要想实现某个参数的“双向”传递，就应当说明该形参为“传址”调用形式。其设置选项是

A．ByVal
B．ByRef
C．Optional
D．ParamArray

单项选择题

如图8-3所示的为VBE界面的“代码”窗口，其中圈出的部分为

单项选择题

图标所代表的数据对象是

单项选择题

表达式(-12.7 Mod -5)返回的值是

A．-1
B．-2
C．-3
D．-4

单项选择题

将数学表达式
写成VBA的表达式，其正确的形式是

单项选择题

以下消除字符串尾部回车换行的函数过程
Public Function TrimCrLf(ByVal InString As String)As String
Do While(______)
InString=Left(InString，Len(InString)-1)
Loop
TrimCrLf=InString
End Function
过程中的空白处应为

A．While Right(InString，1)=Chr(13)
B．While Right(InString，1)=Chr(10)
C．While Right(InString，1)=Chr(13) Or Right(InString，1)=Chr(10)
D．While Right(InString，1)=Chr(13) And Right(InString，1)=Chr(10)

单项选择题

下面Main过程运行之后，则变量J的值为
Private Sub MainSub( )
Dim J As Integer
J=5
Call GetData(J)
End Sub
Private Sub GetData(ByRef f As Integer)
f=f$2+Sgn(-1)
End Sub

A．5
B．7
C．9
D．10

单项选择题

VBA数据类型符号“&”表示的数据类型是

A．整数
B．长整数
C．单精度数
D．双精度数

单项选择题

在VBA代码调试过程中，能够显示出所有在当前过程中变量声明及变量信息的是

A．快速监视窗口
B．监视窗口
C．立即窗口
D．本地窗口

单项选择题

VBA“定时”操作中，需要创建窗体的“计时器间隔(TiemrInterval)”属性值。其计量单位是

A．微秒
B．毫秒
C．秒
D．分钟

单项选择题

函数String(n，字符串)的功能是

A．把数值型数据转换为字符串
B．返回由n个字符组成的字符串
C．从字符串中取出n个字符
D．从字符串中第n个字符的位置开始取子字符串

单项选择题

下面过程运行之后，则变量J的值为
Private Sub Fun( )
Dim JAs Integer
J=5
Do
J=J+2
Loop While J＞10
End Sub

A．5
B．7
C．9
D．11

单项选择题

窗体模块属于

A．标准模块
B．类模块
C．全局模块
D．局部模块

单项选择题

表达式(10.2\5)返回的值是

A．0
B．1
C．2
D．2.04

单项选择题

函数Len(Tim("ABC" & Space(1)& "计算机"))返回的值为

A．6
B．7
C．9
D．10

单项选择题

下面的程序段运行后，变量S的值变为“65666768”，则程序中“表达式”为
i=1
Do While(表达式)
S=S&ASC(Chr$(i+64))
i=i+1
Loop

A．i＞5
B．Not(i＜＞5)
C．i＜5
D．i=5

单项选择题

从字符串A="123456"中返回子串B="34"的正确表达式为

A．B=Mid(A，3，2)
B．B=Right(Left(A，4)，2)
C．B=Left(Right(A，4)，2)
D．Ａ)，Ｂ)和Ｃ)

单项选择题

执行如下语句：
a=InputBox("1"，"2"，"3"，，，"4"，5)
将显示一个输入的对话框，在对话框的输入区中显示的信息是

A．1
B．2
C．3
D．4

单项选择题

DAO模型层次中处在最顶层的对象的是

A．DBEngine
B．Workspace
C．Database
D．RecordSet

单项选择题

下列算式正确的是

A．Fix(2.8)=3
B．Fix(-2.8)=-3
C．Fix(-2.8)=-2
D．以上都正确

单项选择题

函数Intstr("67"，"1234567")返回的值是

A．“67”
B．“1234567”
C．5
D．6

单项选择题

定义了二维数组A(2 t0 5，5)，则该数组的元素个数为

A．25
B．36
C．20
D．24

单项选择题

如图8-1所示的为VBE界面的“代码”窗口，其中圈出的部分为