题目内容

请阅读程序： Private Sub Form_Click() m=1 For i=4 To 1 Step-1 Print str(m); m=m+1 For j=1 To i Print "*"; Next j Print Next i End Sub 程序运行后，单击窗体，则输出结果是______。

A. 1** 2* 3** 4*
B. 4** 3* 2* 1*
C. ** * **** *
D. * * ****

查看答案

搜索结果不匹配？点我反馈

更多问题

在窗体上有一个名称为Command1的命令按钮，并编写有如下程序： Private Sub Command1_Click() Dim I As Integer,J As Integer Dim a(10,10)As Integer For I=1 To 3 For J=1 To 3 a(I,J)=(I-1)*3+J Print a(I,J); Next J Print Next I End Sub 程序运行后，单击命令按钮，窗体上显示的是______。

A. 1 2 3 2 4 6 3 6 9
B. 2 3 4 3 4 5 4 5 6
C. 1 4 7 2 5 8 3 6 9
D. 1 2 3 4 5 6 7 8 9

若有下列程序： Private Sub Form_Click() Dim a a=Array("李军","刘梅","李鹏","李白") For i=LBound(a,1)To UBound(a,1) If Left(a(i),1)="李"Then Print a(i); Next i End Sub 运行时输出的结果是______。

A. 李军
B. 李军李鹏李白
C. 出错信息
D. 李军刘梅李鹏李白

在窗体上有一个由三个单选按钮组成的控件数组，名为chkOption。则用于标识各个控件数组元素的参数是______。

A. Tag
B. Index
C. ListIndex
D. Name

在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程： Option Base 1 Private Sub Command1_Click() Dim city As Variant city=Array("北京","天津","上海","重庆") Print city(1) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。

A. 空白
B. 错误提示
C. 北京
D. 天津