下面程序段运行后,显示结果是()。Dim xIf x Then Print x Else Print x+1A、0B、1C、-1D、显示出错信息

下面程序段运行后,显示结果是()。Dim xIf x Then Print x Else Print x+1

  • A、0
  • B、1
  • C、-1
  • D、显示出错信息

相关考题:

下面程序段的运行结果是【 】。Option Base 1Private Sub swap(a()As InteSer)For I=1 to 10\2t=a(i)a(i)=a(10-1+1)a(10-1+1)=tNext1End SubPrivate Sub Form_Click()Dim x(10)As IntegerFor I=1 to 10x(i)=I*2Next1Swap x()For1=1 to 10Print x (i)Next IEnd Sub

下面程序运行后输出的结果是【】。 include using namespace std; class example{ const 下面程序运行后输出的结果是【 】。include <iostream>using namespace std;class example{const int m;public:example(int i):m(i){}void pr(){cout<<"m="<<m<<endl'}};int main(){example x(100);x.pr();return 0;}

下面程序段运行后,变量x的值为上 【 】 。Dim x As IntegerDim i As Integerx=Ofor i=0 to 50 step 10X=X+inext i

下面程序段运行后,变量X的值为【 】。Dim x AS IntegerDim I AS Integerx=0for I=0 to 50 step 10X=X+I。next IPrint X

运行下面程序段的输出结果是().A.SetB.SetupC.SetupD.Set

下面程序段的运行结果是【 】。Option Base 1Private Sub Swap (a() As IntegFor I=1 to 10\2t=a(I)a(I)=a(10-I+1)a(10-I+1)=tNext IEnd SubPrivate Sub Form_Click()Dim x(10) As IntegerFor I=1 to 10x(I)=I*2Next ISwap x()For I=1 to 10Print x(I)Next IEnd Sub

在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Public Enum S a=4 b=3 End Enum Private Sub Command1 Click( ) Dim x As Integer x=a If x=3 Then MsgBox"Pass!" End Sub 运行程序,其结果是( )。A.运行错误.因为Enum定义有错B.运行错误.因为x=a类型不匹配C.运行正常结束,不显示任何信息D.运行正常.显示内容为“Pass!”的信息框

下面程序段的输出结果是【 】。For X=1.5 To 5 Step 1.5Print X;Next X

下面程序的运行结果是( )。include main(){int a=25; fun(A); }fun(int *x){ print 下面程序的运行结果是( )。include<stdio.h>main(){int a=25;fun(A);}fun(int *x){ printf("%d\n",++*x);}

下面程序的运行结果是在窗体中显示的:运行后窗体上显示的是______。

下列程序段运行结果是______。Dim c As Integer,num As IntegerNum=29483Doc=num Mod 10Print c;num=num\10Loop While num<>0

以下程序运行后,单击命令按钮,窗体显示的结果是 ______。 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

在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Public Enum Sa=4b=3End EnumPrivate Sub Command1 Click( )Dim x As Integerx=aIf x=3 Then MsgBoxPass!End Sub运行程序,其结果是( )。A.运行错误.因为Enum定义有错B.运行错误.因为x=a类型不匹配C.运行正常结束,不显示任何信息D.运行正常.显示内容为“Pass!”的信息框

下面程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click Dim I As Integer Dim sum As Long Dim t1 As Long t1=1:sum=0 For 1=1 To 3 t1=t1*I sum=sum+t1 Next I Print sum End SubA.3B.9C.5D.6

下面的程序段运行后,输出结果是( )。A.9B.不确定值C.0D.18

运行下列程序:Private Sub Form_Click( )Dim x As Integer, y As String, z As Stringy = 12345For x = 1 To Len(y)z = Mid(Left(y, x), 1)Next xPrint zEnd Sub单击窗体后,则在窗体上显示的结果是( )。A.1B.11111C.55555D.12345

运行下列程序:Private Sub Form_Click( )Dim y As Integer, x As IntegerDo Until x > 20x 运行下列程序:Private Sub Form_Click( )Dim y As Integer, x As IntegerDo Until x 20x = x + 10y = y + xIf x 20 Then Exit DoLoopPrint x, yEnd Sub单击窗体后,则在窗体上显示的结果是( )。A.10 20B.30 60C.10 30D.20 60

下列程序段运行后,其运行结果是( )。Dim a(3) As Integer, b(3) As IntegerFor k = 0 To 3a(k) = k*k +kb(k) = a(k)-kNext kPrint a(2) + b(1)A. 5B. 6C. 7D. 8

下面程序段运行后,显示的结果是( )。Dimxasintegerifxthenprintxelseprintx+1 A.1B.0C.-1D.显示出错信息

下面程序段运行后,显示的结果是()。 A0B1C2D不一定

下面程序段运行后,显示结果是()。DimxIf x Then Print x Else Print x+1A、0B、1C、-1D、显示出错信息

下列程序段:Dim x If x Then Print x Else Print x+1运行后,显示的结果是()。A、1B、0C、-1D、出错

下列程序段运行后输出的结果是()。 Private Sub Form_Click Dim X#, Y# X = 5: Y = 6 Print X + Y = 11 End SubA、X+Y=11B、5+6=11C、11D、True

单选题下面程序段运行后,显示结果是()。Dim xIf x Then Print x Else Print x+1A0B1C-1D显示出错信息

单选题下面程序段运行后,显示结果是()。DimxIf x Then Print x Else Print x+1A0B1C-1D显示出错信息

单选题下列程序段:Dim x If x Then Print x Else Print x+1运行后,显示的结果是()。A1B0C-1D出错

单选题下列程序段运行后输出的结果是()。 Private Sub Form_Click Dim X#, Y# X = 5: Y = 6 Print X + Y = 11 End SubAX+Y=11B5+6=11C11DTrue