[单选题]

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Static x As Integer Cls For i=1 To 2 y=y+x x=x+2 Next Print x,yEnd Sub程序运行后,连续三次单击Command1按钮后,窗体上显示的是

A.4 2

B.12 18

C.12 30

D.4 6

参考答案与解析:

相关试题

在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程;Priva

[单选题]在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程; Private Sub Command1_Click() a $="software and hardware" b $=Right(a$, 8) c $=Mid(a$, 1, 8) MsgBox a$, ,b$,c$,1 End Sub 运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是______。A.software and hardwareB.softwareC.hardwareD.1

  • 查看答案
  • 在窗体上画一个名称为Command1命令按钮,然后编写如下事件过程: Priva

    [单选题]在窗体上画一个名称为Command1命令按钮,然后编写如下事件过程:Private Sub Command1_Click()c = “ABCD”F.or n= 1 To 4Print ( )NextE.nd Sub程序运行后,单击命令按钮,要求在窗体上显示如下内容( )。DCDBCDABCD则在( )处填入的内容为。A.Left(c,n)B.Right(c,n)C.Mid(c,n,1)D.Mid(c,n,n)

  • 查看答案
  • 在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:Priva

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

  • 查看答案
  • 在窗体上画一个命令按钮,名称为Command1。然后编写如下事件过程:Priva

    [单选题]在窗体上画一个命令按钮,名称为Command1。然后编写如下事件过程: Private Sub Command1_Click() x=11 Sum=0 For i=1 To x n=Iif(i>5, 1, 2) Sum=Sum+n Next i Print Sum End Sub 运行后的输出结果是______。A.16B.11C.5D.2

  • 查看答案
  • 在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:Priva

    [单选题]在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox a$,,b$,c%,1 End Sub 运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是______。A.software and hardwareB.softwareC.hardwareD.1

  • 查看答案
  • 在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:Priva

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

  • 查看答案
  • 在窗体上画一个名称为Command1命令按钮,然后编写如下事件过程: Priva

    [单选题]在窗体上画一个名称为Command1命令按钮,然后编写如下事件过程: Private Function fun1(n As Integer)As Integer Dim k As Integer If n = 1 Then k = 1 Else k = 1 + fun1(n - 1)* 2 End If fun1 = k End Function Private Sub Command1_Click () Dim m As Integer, x As Integer x = 4 m = fun1

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Priva

    [单选题]在窗体上画一个名称为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

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Priva

    [单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Integer,s As Integer a = 8 s = 1 Do s = s + a a = a - 1 Loop While a<=0 Print s,a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.7 9B.34 0C.9D.死循环

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Priva

    [单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command 1_ Click() Static y As Integer CIs For i=0 To 2 x=x +y y=y +3 Next Print x, yEnd Sub程序运行后,连续二次单击Command1按钮后,窗体上显示的是______。A.9 9B.36 18C.30 12D.63 27

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Priva

    [单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()c="ABCD"F.or n=1 T0 4Print ______NextE.nd Sub程序运行后,单击命令按钮,要求在窗体上显示如下内容:D.C.DB.CDA.BCD则在______处应填入的内容为A.Left(c,n)B.Right(c,n)C.Mid(c,n,1)D.Mid(c,n,n)

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Priva