[试题]

( 8 )在窗体上画一个名称为 “ Command1 ” 的命令按钮,然后编写如下事件过程:

Private Sub Command1_Click()

D.im a As String

a = "123456789"

F.or i = 1 To 5

Print Space(6 - i); Mid$(a, ( 8 ) , 2 * i - 1)

Next i

E.nd Sub

程序运行后,单击命令按钮,窗体上的输出结果是

5

456

34567

2345678

123456789

请填空。

参考答案与解析:

相关试题

在窗体上画一个名称为Command1的命令按钮,然后编写如下程序 _______

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

  • 查看答案
  • ( 23 ) 在窗体上画一个命令按钮,名称为 Command1 ,然后编写如下代

    [单选题]( 23 ) 在窗体上画一个命令按钮,名称为 Command1 ,然后编写如下代码:Option Base 0Private Sub Command1_Click()D.im A(4) As Integer,B(4) As IntegerF.or k = 0 To 2A.(k + 1) = InputBox(" 请输入一个整数 ")B.(3 - k) = A(k + 1)Next kPrint B(k)E.nd Sub程序运行后,单击命令按钮,在输入对话框中分别输入 2 、 4 、 6 ,输

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

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

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

    [单选题]在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private Sub Command1_ Click()Dim a As Integer, b As Integerb = 1for a = 1 To 100 if b>= 10 then exit for if b Mod 3 = 1 then b=b+3 End ifNext aPrint aEnd Sub在命令按钮上单击后,窗体上显示的结果是______。A.101B.6C.5D.4

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

    [单选题]在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_ Click()Dim a As Integer, b As Integerdo while b <100 b=b+5 a=a+ b if b >20 then exit doLoopPrint a, bEnd Sub程序运行后,如果甲击命令按钮,则在窗体上显示的内容是______。A.50 20B.75 25C.50 25D.75 20

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

    [单选题]在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private Sub Command1_ Click() for i = 1 To 4 for j= 0 To i Print Chr$(65 +i) Next j Print Next iEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是______。A.BB CCC DDDD EEEEEB.B CC DDD EEEEC.AA AA CCCC DDDDDD.A BB CCC DDDD

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

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

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

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

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

    [单选题]在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Pnvate Sub Command1_Click() Dim x As Integer,y As Integer,t As Integer x=10:y=20:t=0 If x=y Then t=x:x=y:y=t Print x;y End Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.10 20B.20 0C.20 10D.20 20

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

    [单选题]在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.B.HC.D.

  • 查看答案
  • ( 8 )在窗体上画一个名称为 “ Command1 ” 的命令按钮,然后编写如