在窗体上添加一个命令按钮(名为Command1 ),然后编写如下事件过程:Private sub Command1_Click () For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next i MSgBox x End Sub打开窗体后,单击命令按钮,消息框的输出结果是( )。
查看答案
执行下列VBA语句后,变量n的值是( )。n=0 For k=8 To 0 step -3 n=n+ 1 Next k
A. 1
B. 2
C. 3
D. 8
下面过程运行之后,则变量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
用Function定义的函数过程,返回值的类型( )。
A. 只能是符号常量
B. 是除数组之外的简单数据类型
C. 在调用时由运行过程决定
D. 由函数定义时As子句声明
有以下事件代码,当单击按钮Command1时,消息框中显示的内容是( )。Private Sub Command1_Click() Dim d1 As Date Dim d2 As Date d1 = #1/1/2016# d2 = #12/31/2016# MsgBox DateDiff("yyyy", d1, d2) End Sub
A. 11
B. 365
C. 3