执行语句Dim X,Y As Integer后,______。A.X和Y均被定义为整型变量B.X和Y均被定义为变体类型变量C.
执行语句Dim X,Y As Integer后,______。
A.X和Y均被定义为整型变量
B.X和Y均被定义为变体类型变量
C.X被定义为整型变量,Y被定义为变体类型变量
D.X被定义为变体类型变量,Y被定义为整型变量
执行语句Dim X,Y As Integer后,______。
A.X和Y均被定义为整型变量
B.X和Y均被定义为变体类型变量
C.X被定义为整型变量,Y被定义为变体类型变量
D.X被定义为变体类型变量,Y被定义为整型变量
单击命令按钮时,下列程序的执行结果为Private Sub Command1_Click() Dim x As Integer,y As Integer x=12:y=32 Call Proc(x,y) Print x;yEnd SubPublic Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=m Mod 10End Sub
A.12 32
B.2 32
C.2 3
D.12 3
在窗体上有一个命令按钮Commandl,编写事件代码如下:
Private SuB commandl_Click()
Dim x As Integer,y As Integer
x=12:y=32
Call Proc(x,y)
OeBug.Print x;y
End SuB
PuBlic SuB Proc(n As Integer,Byval m As Integer)
n=n Mod 10
m=m Mod 10
End SuB
打开窗体运行后,单击命令按钮,立即窗口上输出的结果是
A.2 32
B.12 3
C.2 2
D.12 32
执行以下语句后显示结果为 ______。 Dim x As Integer If x Then Print x Else Print x-1
A.1
B.0
C.-1
D.不确定
以下程序的输出结果是()。 Option Base 1 Private Sub Command1_Click() Dim a(10),p(3) as Integer k=5 For I-1 to 10 a(i)=I Next I For j=1 to3 p(i)=a(I*j) Next j For I=l to 3 k=k+ p (I)*2 Next I Print k End Sub
A.33
B.28
C.35
D.37
(11 )下面可以正确定义 2 个整形变量和 1 个字符串变量的语句的是()
A ) Dim n,m AS Interger,s AS String
B ) Dim a%,b$,c AS String
C ) Dim a AS Integer,b,c AS String
D ) Dim x%,y AS Integer,z AS String
在窗体中有一个命令按钮command1,编写事件代码如下: Private Sub Command1_Click() Dim s As Integer s=P(1)+P(2)+P(3)+P(4) Debug.Print s End Sub Public Function P(N As Integer) Dim Sum As Integer Sum=0 For i=1 To N Sum=Sum+1 Next i P=Sum End Function 打开窗体运行后,单击命令按钮,输出的结果是()。
A.15
B.20
C.25
D.35
A.Type定义语句没有放在标准模块中
B.变量声明语句有错
C.赋值语句不对
D.输出语句Print不对
以下语句执行时,从键盘上输入Zhang,执行结果是______。 Dim a As String a=InputBox("Input","","Name") Print a
A.Input
B.Name
C.Zhang
D.空字符串
单击命令按钮时,下列程序的执行结果为 Private Sub Command1_Click() Dim x As Integer,y As Integer x=12:y=32 Call Proc(x,y) Print x;y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub
A.12 32
B.2 32
C.2 3
D.12 3