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

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

1

B

0

C

-1

D

出错


参考解析

解析: 暂无解析

相关考题:

下列语句段在运行时的显示结果是______。Clsx=10.34+8Print Len(x)

若有如下程序:public class Test {public static void main (String[] args) {int x=20;if (x>10) System.out.print(x-=5);if (x>5) System.out.print(x--);}}则程序运行后的输出结果是【 】。

下列VB程序运行后,变量x的值为( )x=2Print x+1Print x+2A.2B.3C.5D.8

下列块结构条件语句,正确的是( )。A.If x>10 Then print"a" Else if x>5 Then print"b" Else if x<5 Then print"c" End ifB.if x>10 Then print"a" Else if x>5 Print"b" Else Print"c" End ifC.If x>10 Then print"a" Else if x>5 Then print"b" Else x<5 Then Print"c" End ifD.If x>10 Then Print"a" Else if x>5 Then print"b: Else Print"c" End if

下列程序段的执行结果为( )。 Dim x as integer If x Then Print x Else Print x+1 A. 1B. 0C. -1D. 显示出错信息

下列程序的运行结果为【 】。A="1"B="2"A=Val (@A@+Val (@B@B=Val ("12")If A<>B Then Prink A-B Else Print B-A(11)阅读下列程序:Option Base 1Private Sub Form. Click()Dim x(3,3)For j=1 to 3For k=1 to 3If j=k then x(j,k)=1If j<> k then x(j,k)=3Next kNext jCall fun(x())End SubPrivate Sub fun(a())For j=l to 3For k=1 to 3Print a (j.k);Next kNext jEnd Sub运行程序时,输出的结果是【 】

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

运行下面程序后,正确的输出结果是 ______。Private Sub Command1_ Click() x = 6 if x >6 then Print "x>6": Else if x <8 then Print "x<8"; Else if x = 6 then Print "x=6": End if End if End ifEnd SubA.x<8 x=6B.x<8C.x=6D.x<8或x=6

已知x代表某个百分制成绩,下列程序段用于显示对应的五级制成绩,正确的是( )A.If x>=60 Then Print"及格" Else If x>=70 Then Print"中" Else If x>=80 Then Print"良" Else If x>=90 Then Print"优" Else Print"不及格" End IfB.If x<90 Then Print"良" Else If x<80 Then Print"中" Else If x<70 Then Print"及格" Else If x<60 Then Print"不及格" Else Print"优" End IfC.If x>=90 then Print"优" Else If x>=80 Then Print"良" Else If x>=70 Then Print"中" Else If x>=60 Then Print"及格" Else Print"不及格" End If End SelectD.Select Case x Case x>=90 Print"优" Case x>=80 Print"良" Case x>=70 Print"中" Case x>=60 Print"及格" Case Else Print"不及格"

在窗体上绘制一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1 Click() Dim i As Integer, x As Integer For i=1 To 6 If i=1 Then x=i If i<= 4 Then x=x+1 Else x=x+2 End If Next i Print x End Sub 程序运行后,单击命令按钮,其输出结果为A.9B.6C.12D.15

下列程序段( )能够正确实现条件:如果X<Y则A=15,否则A=-15。A.If X<Y Then A=15 A=-15 Prin AB.If X<Y Then A=15:Print A A=-15:Print AC.If X<Y Then A=1.5:Print A Else A=-15:Print A End IfD.If X<Y Then A=15 Else A=-15 Print A End If

在窗体上绘制一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim i As Integer,x As Integer For i_1 T0 6 If i=1 Then x=i If i<=4 Then x=x+1 Else x=x+2 End If Next i Print x End Sub 程序运行后,单击命令按钮,其输出结果为( )。A.9B.6C.12D.15

如果x为整数且|x|>=100,则打印“OK”,否则打印“Error”,表示这个条件的单行格式 If语句是A.If Int((x)=x And Sqr(x)>=100 Then Print "OK" Else Print "Error"B.If Fix(x)=x And Abs(x)>=100 Then Print"OK"Else Print"Error"C.If Int(x)=x And (x>=100,x<=-100)Then Print"OK"Else Print"Error"D.If Fix(x)=x And x>=100 And x<=-100 Then Print "OK" Else Print "Error"

下面程序段执行结果为x=Iht(Rnd()+4)Select Case x Case 5 Print"excellent" Case 4 Print"good" Case 3 Print"paSS" Case Else Print "fail"End SelectA.excellentB.goodC.passD.fail

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

下列程序段的执行结果为______。 x=Int (Rnd+4) Select Case x Case 5 Print“优秀” Case 4 Print“良好” Case 3 Print“通过” Case Else Print“没有通过” End SelectA. 优秀B.良好C.通过D.没有通过

下面程序段执行结果为( )。 x=Int(Rnd()+4) Select Case x Case 5 Print"excellent" Case4 Print"good" Case 3 Print"pass" Case Else Print"fail" End SelectA.excellentB.goodC.passD.fail

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

以下程序输出什么?"""x=1"""whilex:print(x) A.运行结果显示NameError:name'x'isnotdefinedB.运行结果无限循环输出1C.它等价于下面的程序#x=1whilex:print(x)D.它等价于下面的程序whilex:print(x)

在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer If a=0 Then x=x-1 Else If b<>0 Then End If End If If c<>0 Then x=3 Else x=4 End If Print x End Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.34B.4C.35D.3

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

下面程序段运行后,显示结果是()。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显示出错信息

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