网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)
单选题
执行下面程序,单击命令按钮Command1后,窗体上显示的内容是()。 Private Sub Command1_Click() Dim x As Integer,y As Integer x=-5 If Sgn(x)Then y=Sgn(x^2) Else y=Sgn(x) End If Print y End Sub
A

-5

B

25

C

1

D

-1


参考答案

参考解析
解析: 暂无解析
更多 “单选题执行下面程序,单击命令按钮Command1后,窗体上显示的内容是()。 Private Sub Command1_Click() Dim x As Integer,y As Integer x=-5 If Sgn(x)Then y=Sgn(x^2) Else y=Sgn(x) End If Print y End SubA -5B 25C 1D -1” 相关考题
考题 在窗体上有一个命令按钮,其名称为Command1。要实现程序运行后,单击命令按钮,如果在输入对话框里分别输入12和4,编写如下事件过程:Private Sub Command1_Click()A=InputBox("被除数")B=InputBox("除数")Print A;"÷";B;"=";A / BEnd Sub则窗体中显示的内容是______。

考题 在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private Sub Command1_Click()For I=1 To 2For J=1 To IPrint String(I,"Hello");Next JPrintNext IEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A.H HH HHB.H HHHHC.HHHHHD.H HH HHHH

考题 在窗件上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a=12345 Print Format S(a, "000. 00") End Sub 程序运行后,单击命令按钮,窗体上显示的是______。A.123.45B.12345.00C.12345D.00123.45

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Sum=0 For x=1 To 5 Call subl(x, s) Sum=Sum+s Next x Print Sum End Sub Private Sub subl(y, w) w=1 For i=1 To y w=w*i Next i End Sub 程序运行后。单击命令按钮,则窗体上显示的内容是______。A.5B.120C.153D.160

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub subl(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x*x+y*y End Sub Private Sub Command1_Click() Dim a As Integer a=8 Call subl(1, 2,a) Print a End Sub 程序运行后,单击命令按钮,则窗体下显示的内容是______。A.8B.2C.5D.11

考题 在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As String, c As Integer a=1234: b=Str(a)c=Len(b)Print c End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。A.0B.5C.6D.7

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。A.VVVB.VisC.sicD.11

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub CommaLndl_Click() For n=1 To 20 If n Mod 3<>0 Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。A.15B.18C.21D.24

考题 在窗体上画一个命令按钮,名称为Command1,然后编写下列程序:Private Sub Command1_Click()For i=1 To 2For j=1 To iPrint String(i,"Hello")Next jPrintNext iEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A)B)C)D)HA.H HH HHB.H HHHHC.HHHHD.H

考题 在窗体上画一外名称Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )x=0n=InputBox(" ")For i = 1 To nFor j = 1 To ix=x+1Next jNext iPrint xEnd Sub程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是【 】。

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Private Sub Commandl_Click( )Static X As IntegerStatic Y As IntegerClsY=1Y=Y+5X=5+XPrint X, YEnd Sub程序运行时,3次单击命令按钮Command1后,窗体上显示的结果为【 】。

考题 在窗体上画—个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim num As Integer num=1 Do Until num>6 Print num; num=num+4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是_________。A.13.45.8B.1 3 5C.147D.无数据输出

考题 在窗体上添加一个命令按钮(名为Command1),然后编写如下程序:Private Sub Command1_Click()Dim a As Integer,b As Integerx=10y=20End Sub打开窗体运行后,单击命令按钮,消息框的输出结果为( )。

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() a = 2 For i=1 To 3 Call funl(i,A)Next i x = i + 2 Print x;a End Sub Private Sub fun1(n,m) m=m + n * 2 n = n + m End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.1 5B.4 5C.8 4D.3 4

考题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click( ) a=12345 Print Format $(a,"000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A.123.45B.12345.00C.12345D.00123.45

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click () x=0 n=InputBox ("") For i=1 TO n For j=1 To i x=x+1 Next j Next i Print x End Sub 程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是( )。A.3B.4C.5D.6

考题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是A.VVVB.VisC.sicD.11

考题 单击窗体上的命令按钮Command1,【 】Private Sub Command1_Click()a= "10"b=20c=Val(A)+bPrint cEnd Sub

考题 在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()Dim a()a=Array("机床","车床","钻床","轴承")Print a(2)End Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序 _______。 Dim k As Integer Private Sub Form_Load() k=5 End Sub Private Sub Command Click() Static b As Integer b = b + k k=k+1 Print k,b End Sub 程序运行时,两次单击命令按钮Command1后,在窗体上显示的第二行是 _______。A.7 11B.5 11C.76D.2 1

考题 在窗体中有一个标签Lb1和一个命令按钮Command1,事件代码如下:Option Compare DatabaseDim a As String*10Private Sub Command1 Click()a="1234"b=Len(A)Me.Lb1.Caption=bEnd Sub打开窗体后单击命令按钮,窗体中显示的内容是( )。A.4B.5C.10D.40

考题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A. 123.45B.12345.00C.12345D.00123.45

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub sub1(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x * x+ y * y End Sub Private Sub Command1_Click() Dim a As Integer a = 8 Call sub1(1, 2,A)Print a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.8B.2C.5D.11

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是A.VVVB.VisC.sicD.11

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() For n=1 To 20 If n Mod 3<>0 Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。A.15B.18C.21D.24

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Dim k As Integer Private Sub Form_Load() k=15 End Sub Private Sub Command1_Click() Static b As Integer b=b+k k=k+1 Print k,b End Sub 程序运行时,两次单击命令按钮Command1后,在窗体上显示的第二行是( )。A.17 31B.15 31C.17 16D.2 1

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x = -5If Sgn(x) Then y = Sgn(x ^ 2)Else y = Sgn(x)End IfPrint yEnd Sub程序运行后,单击命令按钮,窗体上显示的是( )。A.-5B.25C.1D.-1

考题 执行下面程序,单击命令按钮Command1后,窗体上显示的内容是()。 Private Sub Command1_Click() Dim x As Integer,y As Integer x=-5 If Sgn(x)Then y=Sgn(x^2) Else y=Sgn(x) End If Print y End SubA、-5B、25C、1D、-1