执行语句 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被定义为整型变量

相关考题:

下面可以正确定义2个整形变量和1个字符串变量的语句的是( )。A.Dim n,m AS Interger,s AS StringB.Dim a%,b$,c AS StringC.Dim a AS Integer,b,c AS StringD.Dim x%,y AS Integer,z AS String

单击命令按钮执行下列程序,其输出结果是。 Private Sub Commana1_Click() Dim a As Integer,b As Integer,c As Integer a = 3 b = 4 c = 5 Print SecProc(c,b,a) End Sub Function FirProc(x As Integer,y As Integer,z As Integer) FirProc = 2 * x + y + 3 * z End Function Function SecProc(x As Integer,y As Integer,z As Integer) SecProc = FirProc(z,x,y) + x End FunctionA. 20 B. 22 C. 28 D. 30

下面可以正确定义两个整型变量和—个字符串变量的语句是______。A.Dim n,m As Integer,s As StringB.Dim a%,b$,c As StringC.Dim a As Integer,b,c As StringD.Dim x%,y As Integer,z As String

( 11 )下面可以正确定义 2 个整形变量和 1 个字符串变量的语句的是( )A ) Dim n,m AS Interger,s AS StringB ) Dim a%,b$,c AS StringC ) Dim a AS Integer,b,c AS StringD ) Dim x%,y AS Integer,z AS String

执行语句 Dim X, Y as Integer 后,A ) X 和 Y 均被定义为整型变量B ) X 和 Y 被定义为变体类型变量C ) X 被定义为整型变量, Y 被定义为变体类型变量D ) X 被定义为变体类型变量, Y 被定义为整型变量

单击命令按钮时,下列程序代码的执行结果为( )。 Private Function FirProc(x As Integer,y As Integer,z As Integer) FirProc=2*x+y+3*z End Funcfion Private Function SecProc(x As Integer,y As Integer,z As Integer) SecProc=FirProc(z,x,y)+x End Funcfion Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer a=2 b=3 c=4 Printf SecProc(c,b,a) End SubA.21B.19C.17D.34

(13)单击命令按钮时,下列程度的执行结果是 Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer a=2:b=4:c=6 Call S2(a,b) Print"a=";a;"b=";b;"c=";c; End Sub Private Sub S1(x As Integer,y As Integer) Dim c As Integer x=2*x:y=y+2:e=x+y End Sub Sub S2(x As Integer,By Val y As Integer) Dim e As Integer x=2*x:y=y+2:e=x+y End Sub A.a=4 b=6 c=6 B.a=8 b=6 c=6 a=4 b=6 c=6 a=8 b=6 c=6 C.a=4 b=6 c=6 D.a=8 b=6 c=6 a=8 b=6 c=6 a=4 b=6 c=6

单击命令按钮时,下列程序代码的执行结果为______。 Private Sub Proe1 (n As Integer,ByVa1 m As Integer) n=n Mod 10 m=m\ 10 End Sub Private Sub Command1_Click() Dim x As Integer Dim y As Integer x= 12 y = 34 Call Proe1 (x, y) Print x; y End SubA. 12 34B.2 34C.2 3D.12 3

以下定义数组或给数组元素赋值的语句中,正确的是A.Dim x%(2) x(1)="等级考试"B.Dim x(3), y(3)As Integer x(0)=1:y=xC.Dim x x=Array(0,1,2)D.Dim x(3)As Integer x=Array(0,1,2)

单击命令按钮时,下列程序代码的执行结果为 ( ) Function FirProc(x As Integer, y As Integer, z As Integer) FirProc=2*x+y+3*z End Function Function SecProc(x As Integer, y As Integer, z As Integer) SecProc=FirProc(z, x, y)+x End Function Private Sub Commandl Click() Dim a As Integer, b As Integer, c As Integer a=2 :b=3 :c=4 Print SecProc(c, b,A)End SubA.21B.19C.17D.34

单击命令按钮时,下列程序段的执行结果为( )。 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a-2:b=4:c=6 Call S1(a,b)Print "a="; a; "b="; b; "c="; c Call S2(a,b)Print "a ="; a; "b="; b; "c="; c; End Sub Private Sub S1(x As Integer, y As Integer) Dim c As Integer x=2*x:y=y+2:c=x+y End Sub Sub S2(x As Integer, ByVal y As Integer) Dim e As Integer x=2*x:y=y+2:e=x+y End SubA.a=4 b=6 c=6 a=4 b=6 c=6B.a=8 b=6 c=6 a=8 b=6 c=6C.a=4 b=6 c=6 a=8 b=6 c=6D.a=8 b=6 c=6 a=4 b=6 c=6

执行语句Dim X,Y As Integer后,______。A.X和Y均被定义为整型变量B.X和Y均被定义为变体类型变量C.X被定义为整型变量,Y被定义为变体类型变量D.X被定义为变体类型变量,Y被定义为整型变量

单击一次窗体之后,下列程序代码的执行结果为______。 Private Sub Command1_ Click() Dim a As Integer, b As Integer, c As Integer a = 1: b = 2: c = 4 Print Value(a, b,C)End Sub Function Num(x As Integer, y As Integer, z As Integer) Num = x * x + y * y + z * z End Function Function Value(x As Integer, y As Integer, z As Integer) Value = Num(x, y, z) + 2 * x End FunctionA.21B.23C.19D.35

单击命令按钮时,下列程序的执行结果是Private Sub Commandl_Click()Dim a As Integer,b As Integer,c As Integera=3:b=4:c=5Print SecProc(c,b,A)End SubFunction FirProc(x As Integer,y As Integer,z As Integer)FirProc=2*x+y+3*zEnd FunctionFunction SecProc(x As Integer,y As Integer,z As Integer)SecProc=FirProc(z,x,y) +xEnd FunctionA.20B.22C.28D.30

单击命令按钮执行下列程序,其输出结果是( )。Private Sub Command1_Click()Dim a As Integer,b As Integer,c As Integera=3b=4c=5Prim SecProc(c,b,A)End SubFunction FirProc(x As Integer,y As Integer,z As Integer)FirProc=2*x+y+3*zEnd FunctionFunction SecProc(x As Integer,y As Integer,z As Integer)SecProc=FirProc(z,x,y)+xEnd FunctionA.20B.22C.28D.30

单击命令按钮时,下列程序的执行结果为 Private Sub Command1_Click() Dim x As Integer,y As Integer x=50:y=78 Call PPP(x,y) Print x;y End Sub Public Sub PPP(ByVal n As Integer,ByValm As Integer) n=n\10 m=m\10 End SubA.08B.50 78C.450D.78 50

执行语句Dim X,Y As Integer后( )

编写如下代码:Dim Flag As BooleanPrivate Sub Form. MouseDown (Button As Integer,Shift As Integer, X As Single, Y As Single)Flag = TrueEnd SubPrivate Sub Form. MouseMove (Button As Integer,Shift As Integer, X As Single, Y As Single)Flag = FalseEnd SubPrivate Sub Form_ MouseUp (Button As Integer,Shift As Integer, X As Single, Y As Single)If Flag = False ThenPrint "DDDD"End IfEnd Sub程序运行后,如果想在窗体上输出DDDD,则应执行的操作为______。

以下程序运行后,单击命令按钮,窗体显示的结果是 ______。 Private Function p1(x As Integer,y As Integel,z As Integer) p1=2*x+y+3*z End Function Private Function p2(x As Integer,y As Integer,z As Integer) p2=p1(2,y,x)+x End Function Private SubCommandl_Click() Dim a As Integer Dim b As Integer Dim c As Integer a=2:b=3:c=4 Print p2(c,b,A)End SubA.19B.21C.22D.23

执行以下语句后显示结果为______。 Dim x As Integer If x Then Print x Else Printx-1A.1B.0C.-1D.不确定

有如下函数:Private Function firstfunc(x As Integer, y As Integer) As Integer Dim n As Integer Do While n <= 4 x=x +y n=-+1 Loop firstfunc = x End Function调用该函数的事件过程如下:Private Sub Command1_lick() Dim x As Integer Dim y As Integer Dim n As Integer Dim z As Integer x=1 y=1 For n = 1 To 3 z = firstfunc(x, y) Next n Print z End Sub该事件过程的执行结果是 ______。A.1B.3C.16D.9

阅读下面的程序; Function Func(x As Integer,y As Integer)As Integer Dim n As Integer Do While n < = 4 x=x + y n = n + 1 Loop Func=x End Function Private Sub Command1_Click() Dim x As Integet, y As Integer Dim n As Integer,z As Integer x=1 y=1 For n = 1 To 6 z=Func(x,y) Next n Print z End Sub 程序运行后,单击命令按钮,输出的结果为.A.16B.21C.26D.31

下列数组说明语句正确的是A.Dim g(0,-5)As SingleB.Dim h(100 To 100,100)As StringC.Dim x(5)As Integer ReDim x(10)As IntegerD.Dim y() ReDim y

执行以下语句后显示结果为______。 Dim x As Integer If X Then Print x Else Print X-1A.1B.0C.-1D.不确定

在VB中,使用变量前一般应对变量进行定义。以下变量定义语句错误的是()。A、Dim  x As IntegerB、Dim  x As Integer,y As SingleC、Var  x,y:IntegerD、Dim  x As Integer,y As Integer

以下声明语句中错误的是()。A、Const var1=123B、Dim var2=’ABC’C、Dim x_y_z%D、Static var3 As Integer

单选题执行语句Dim X,Y As Integer后,(  )。AX、Y均被定义为整型变量BX、Y均被定义为变体类型变量CX被定义为整型变量,Y被定义为变体类型变量DX被定义为变体类型变量,Y被定义为整型变量

单选题执行语句 Dim X, Y as Integer 后,()AX和Y均被定义为整型变量BX和Y被定义为变体类型变量CX被定义为整型变量,Y被定义为变体类型变量DX被定义为变体类型变量,Y被定义为整型变量