在窗体上面画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下代码: Sub S(X As Integer,y As Integer) Static z As Integer y=x*x+Z z=y End Sub Private Sub Command1 Click( ) Dim i As Integer.z As Integer m=0 z=0 For i=1 T0 3 S i,Z m=m+z Next i Label1.Caption=Str(m) 程序运行后,单击命令按钮,在标签中显示的内容是( )。A.50B.20C.14D.7
在窗体上面画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下代码: Sub S(X As Integer,y As Integer) Static z As Integer y=x*x+Z z=y End Sub Private Sub Command1 Click( ) Dim i As Integer.z As Integer m=0 z=0 For i=1 T0 3 S i,Z m=m+z Next i Label1.Caption=Str(m) 程序运行后,单击命令按钮,在标签中显示的内容是( )。
A.50
B.20
C.14
D.7
相关考题:
在窗体上面画一个命令按钮和一个标签,其名称分别为 Command1和 Label1,然后编写如下事件过程:Private Sub Commandl_Click()Counter=0For i=1 To 4For j=6 To 1 Step -2Counter=Counter+1Next jNext iLabel1.Caption=Str(Counter)End Sub程序运行后,单击命令按钮,标签中显示的内容是( )。 A.11B.12C.16D.20
( 20 )在窗体上画一个命令按钮和两个标签,其名称分别为 Command1 、 Label1 和 Label2 ,然后编写如下事件过程:Private Sub Command1_Click()a = 0For i = 1 To 10a = a + 1b = 0For j = 1 To 10a = a + 1b = b + 2Next jNext iLabel1.Caption = Str(a )Label2.Caption = Str(b )End Sub程序运行后,单击命令按钮,在标签 Label1 和 Label2 中显示的内容分别是A ) 10 和 20B ) 20 和 110C ) 200 和 110D ) 11 0 和 20
在窗体上画一个名称为Labe11、标题为“VisualBasic考试”的标签,两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timerl的计时器控件,并把其Interval属性设置为500,如下图所示。编写如下程序: Private Sub Form_Load() Timer1.Ena bled=False End Sub Private Sub Commandl_ChCk() Timer1.EnaA.标签的移动方向为自右向左B.单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动C.当标签全部移出窗体后,将从窗体的另一端出现,重新移动D.标签按指定的时间间隔移动
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。A.VVVB.VisC.sicD.11
D)窗体(Form)可以作为过程的参数(25)在窗体上画一个名称为 Command1 的命令按钮,再画两个名称分别为 Label1、Label2 的标签,然后编写如下程序代码:Private X As IntegerPrivate Sub Command1_Click( )X=5: Y=3Call proc(X, Y)Label1.Caption=XLabel2.Caption=YEnd SubPrivate Sub proc(a As Integer, ByVal b As Integer)X=a*aY=b+bEnd Sub程序运行后,单击命令按钮,则两个标签中显示的内容分别是( )。A)25 和 3B)5 和 3C)25 和 6D)5 和 6
(6)在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为 Text1、Label1 和 Command1,然后编写如下两个事件过程:Private Sub Command1_Click( )S$=InputBox("请输入一个字符串")Text1.Text=S$End SubPrivate Sub Text1_Change( )Label1.Caption=UCase(Mid(Text1.Text, 7))End Sub程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串“VisualBasic”,则在标签中显示的内容是 【6】 。
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Labell,然后编写如下代码:Sub S(x As Integer,Y As Integer)Static z As Integery=x*x+zz=yEnd SubPrivate Sub Command1_Click()Dim i As Integer,z As Integerm=0z=0For i=1 To 3S i,zm=m+zNext iLabel1.Caption=Str(m)End Sub程序运行后,单击命令按钮,在标签中显示的内容是A.50B.20C.14D.7
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Labell,然后编写如下事件过程: Private Sub Command1_Click() Counter=0 For i=1 To 4 For j=6 To 1 Step -2 Counter=Counter+1 Next j Next i Labell.Captidn=Str(Counter) End Sub 程序运行后,单击命令按钮,标签中显示的内容是______。A.11B.12C.16D.20
在窗体上画一个名称为Command1的命令按钮和3个名称分别为Label1, Label2, Label3的标签,然后编写如下代码: Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n= 10 z = n + z y = y + z x = x + z Label1.Caption = x LabelCaption = y LabelCaption = z End Sub 运行程序,连续三次单击命令按钮后,则3个标签中显示的内容分别是A.10 10 10B.30 30 30C.30 30 10D.10 30 30
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Private Sub Commandl_Click( )Static X As IntegerStatic Y As IntegerClsY=1Y=Y+5X=5+XPrint X, YEnd Sub程序运行时,3次单击命令按钮Command1后,窗体上显示的结果为【 】。
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码: Private X As Integer Private Sub Command1_Click( ) X=5:Y=3 Call proc(X,Y) Label1.Caption=X LabeLCaption=Y End Sub Private Sub proc(ByVal a As Integer,ByVal b As Integer) X=a*a Y=b+b End Sub 程序运行后,单击命令按钮,则两个标签中显示的内容分别是A.5和3B.25和3C.25和6D.5和6
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Prirate Sub Command1_Click() s = 0 For i=1 To 13 x = i * i-1 If x Mod 3 = 0 Then s = s + 1 Next i Print s End Sub 程序运行后,单击命令按钮,则窗体中显示的内容是A.1B.5C.27D.45
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x) End Sub 程序运行后,在文本框中输入28.653,单击命令按钮,标签中显示的内容是: ______。A.27B.28C.29D.30
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Labe11,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(TextText)+0.5) LabeCaption=Str(x) End Sub 程序运行后,在文本框中输入653,单击命令按钮,标签中显示的内容是______。A.27B.28C.29D.30
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() x=-5 If Sgn(x) Then y=Sgn(x^2) Else y=Sgn(x) End If Print y End Sub 程序运行后,单击命令按钮,其输出结果为 ______。A.-5B.25C.-1D.1
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click( ) a=12345 Print Format $(a,"000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A.123.45B.12345.00C.12345D.00123.45
在窗体上画一个名称为CommRnd1的命令按钮,一个名称为Labell的标签,然后编写如下事件过程:Private Sub Command1 Click()s=0For i=1 TO 15x=2*i-1if x Mod 3;0 Then s=s+lNext iLabe11.Caption=sEnd Sub程序运行后,单击命令按钮,则标签中显示的内容是上【 】。
在窗体上画两个名称分别为Label1和Label2的标签,再画一个名称为Command1的命令按钮,然后编写如下事件过程:运行上面的程序,单击命令按钮.其输出结果是A.8 9B.8 18C.64 9D.64 18
在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Label1,然后编写如下事件过程:Private Sub Command1_Click()Counter=0For i=1 T0 4For j=6 T0 1 Step -2Counter=Counter+1Next jNext iLabel1.Caption=Str(Counter)End Sub程序运行后,单击命令按钮,标签中显示的内容是______。
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click( ) S=0 For i=1 To 15 x=2*i-1 1fx Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是A.1B.5C.27D.45
在窗体上画一个命令按钮(其名称为Command1),然后编写如下代码:Private Sub Command1 Click( ) Dim a a=Array(1,2,3,4) i=3:j=1 Do While=0 s=s+a i)*j i=i-1 j=j*1c Loop Print S End Sub 运行上面的程序,单击命令按钮,则输出结果是( )。A.4321B.123C.234D.1234
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:Private Sub Command1_Click() strText = InputBox("请输入") Text1.Text = strTextEnd SubPrivate Sub Text1_Change() Label1.Caption = Right(Trim(Text1.Text), 3)End Sub程序运行后,单击命令按钮,如果在输入对话框中输入abcdef,则在标签中显示的内容是A. 空B.abcdefC.abcD.def
在窗体上画一个名称为Command1的命令按钮、一个名称为Label1的标签,然后编写如下事件过程; Private Sub Command1_Click() s=0 For i=1 to 15 x=2*i-1 If x Mod 3=0 Then s=s+1 Next i Label1. Caption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是______。A.1B.5C.27D.45
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Labe11、Labe12的标签,然后编写如下程序代码: Private X As Integer Private Sub Command1_C1ick() X=5:Y=3 Call proc(X,Y) LabeCaption=X LabeCaption=Y End Sub Private Sub proc(ByVal a As Integer,ByVal b As Integer) X=a*a Y=b+b End Sub 程序运行后,单击命令按钮,则两个标签中显示的内容分别是______。A.5和3B.25和3C.25和6D.5和6
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x = -5If Sgn(x) Then y = Sgn(x ^ 2)Else y = Sgn(x)End IfPrint yEnd Sub程序运行后,单击命令按钮,窗体上显示的是( )。A.-5B.25C.1D.-1
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1、Label2的标签,然后编写如下的事件过程: Private x As Integer Private Sub Command1_Click( ) x = 5: y = 3 Call Proc(x, y) Label1.Caption = x Label2.Caption = y End Sub Private Sub Proc(ByVal a As Integer, ByVal b As Integer) x = a * a y = b + b End Sub 运行程序后,则两个标签中显示的内容分别是()A、5和3B、25和3C、25和6D、5和6
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下的事件过程: Private Sub Command1_Click( ) s = 0 For i = 0 To 15 X = 2 * i - 1 If X Mod 3 = 0 Then s = s + 1 Next i Label1.Caption = s End Sub 程序运行后,单击命令按钮,则标签中显示的内容为()A、1B、5C、27D、45