运行下列程序,结果是()。Private Sub Command32_Click()f0 = 1 : f1 = 1 : k = 1Do While k <= 5f = f0 + f1f0 = f1f1 = fk = k + 1LoopMsgBox “f = ” & fEnd Sub
A. f=5
B. f=7
C. f=8
D. f=13
查看答案
假定有以下两个过程:Sub S1(ByVal x As Integer,ByVal y As Integer)Dim t As Integert=xx=yy=tEnd SubSub S2(x As Integer,y As Integer)Dim t As Integert=x : x=y : y=tEnd Sub下列说法正确的是()
A. 用过程S1可以实现交换两个变量的值的操作,S2不能实现
B. 用过程S2可以实现交换两个变量的值的操作,S1不能实现
C. 用过程S1和S2都可以实现交换两个变量的值的操作
D. 用过程S1和S2都不可以实现交换两个变量的值的操作
下列表达式计算结果为日期类型的是()
A. #2014-10-23# – #2014-2-3#
B. Year(#2014-2-3#)
C. DateValue(“2014-2-3”)
D. Len(“2014-2-3”)
VBA语句”Dim NewArray(10) as Integer”的含义是()
A. 定义10个整型数构成的数组NewArray
B. 定义11个整型数构成的数组NewArray
C. 定义1个值为整型数的变量NewArray
D. 定义1个值为10的变量NewArray
下列表达式计算结果为数值类型的是()
A. #5/5/2013# – #5/1/2013#
B. ”102″ > “11”
C. 102 = 98 + 4
D. #5/1/2013# + 5