单项选择题

请阅读程序:
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.*
* *
* * *
* * * *
<上一题 目录 下一题>
热门 试题

单项选择题
下列可以打开随机文件的语句是( )
A.Open"file1.dat"For Input As#1
B.Open"file1.dat"For Append As#1
C.Open"file1.dat"For Output As#1
D.Open"file1.dat"For Randow As#1 Len=20
单项选择题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim a$,b$,c$,k% a= ABCD b= 123456 c= k=1 Do White k<=Len(a)Or k<=Len(b) If k<=Len(a) Then c=c&Mid(a,k,1) End If If k<=Len(b) Then c=c&Mid(a,k,1) End If k=k+1 Loop Print c End Sub 运行程序,单击命令按钮,输出结果是( )
A.123456ABCD
B.ABCD123456
C.D6C584A321
D.A182C3D456
相关试题
  • 请阅读程序: Option Base 1 Private...
  • 在窗体上画一个命令按钮和两个文本框,其名...
  • 下面函数的功能应该是:删除字符串str中所...
  • 有弹出式菜单的结构如下表所示,程序运行时...
  • 在窗体上画一个命令按钮(其名称为Command...