在窗体上画1个命令按钮,并编写如下事件过程:Private Sub Command1-Click()For i=5 To 1 Step-0.8Print Int(i);Next iEnd Sub运行程序,单击命令按钮,窗体上显示的内容为A.5 4 3 2 1 1B.5 4 3 2 1C.4 3 2 1 1D.4 4 3 2 1 l

在窗体上画1个命令按钮,并编写如下事件过程:

Private Sub Command1-Click()

For i=5 To 1 Step-0.8

Print Int(i);

Next i

End Sub

运行程序,单击命令按钮,窗体上显示的内容为

A.5 4 3 2 1 1

B.5 4 3 2 1

C.4 3 2 1 1

D.4 4 3 2 1 l


相关考题:

在窗体上画一个名称为 \Command1\ 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a As StringA="123456789"For i=1 To 5Print Space(6-i);Mid $ (a,______ ,2*i-1)Next iEnd Sub程序运行后,单击命令按钮,窗体上的输出结果是5456345672345678123456789请填空。

( 8 )在窗体上画一个名称为 “ Command1 ” 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a As Stringa = "123456789"For i = 1 To 5Print Space(6 - i); Mid$(a, 【 8 】 , 2 * i - 1)Next iEnd Sub程序运行后,单击命令按钮,窗体上的输出结果是5456345672345678123456789请填空。

( 23 )在窗体上画 1 个命令按钮,并编写如下事件过程:Private Sub Command1_Click()For i=5 to 1 step -0.8Print Int(i);Next iEnd Sub运行程序,单击命令按钮,窗体上显示的内容为A ) 5 4 3 2 1 1B ) 5 4 3 2 1C ) 4 3 2 1 1D ) 4 4 3 2 1 1

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a(5) As StringFor i = 1 To 5a(i) = Chr(Asc("A") + (i - 1))Next iFor Each b In aPrint b;NextEnd Sub程序运行后,单击命令按钮,输出结果是( )。A.ABCDEB.1 2 3 4 5C.abcdeD.出错信息

在窗体上画一个名称为Commmld1的命令按钮,编写如下事件过程Private Sub Command1 Click()Dim a As Stringa=______For i = 1 To 5Print Space(6-i);Mid$(a, 6-i, 2*i-1)Next iEnd Sub程序运行后,单击命令按钮,要求窗体上显示的输出结果为5456345672345678123456789请填空。

在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim a(5)As String Fori=1 To 5 a(i)=Chr(Asc("A")+(11)) Nexti For Each b In a Print b Next End Sub 程序运行后,单击命令按钮,输出结果是( )。A.ABCDEB.1 2 3 4 5C.abcdeD.出错信息

在窗体上画1个命令按钮,并编写如下事件过程: private Sub Command1_Click( ) For i=5 To 1 Step-0.8 Print Int(i); Next i End Sub 运行程序,单击命令按钮,窗体上显示的内容为( )。A.5 4 3 2 1 1B.5 4 3 2 1C.4 3 2 1 1D.4 4 3 2 1 1

在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5)As String For i=1 T0 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是______。A.ABCDEB.1 2 3 4 5C.abodeD.出错信息

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Commandl_Click()Dim a (1 To 10)Dim p(1 To 3)k=5For i=1 To 10a(i)=iNextiFori=1 To 3p(i)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iPrint kEnd Sub程序运行后,单击命令按钮,输出结果是【 】。