当前位置: 答题翼 > 问答 > 计算机类考试 > 正文
目录: 标题| 题干| 答案| 搜索| 相关
问题

请阅读程序:Private Sub Form. Click( ) m=1 For i=4To 1 Step-1 Print Str(m);m=m+1For j=1 To


请阅读程序:

Private Sub Form. Click()

m=1

For i=4To 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.*

**

***

****

请帮忙给出正确答案和分析,谢谢!

参考答案
您可能感兴趣的试题
  • 运行下列程序:Private Sub form_Click()x = InputBox("请输入一个数:")Select Cas

  • 运行下列程序:Private Sub form_Click()s = InputBox("请输入一个字符A:")Select

  • 运行下列程序:Private Sub Form_Click()a = 3t = InputBox("请输入一个整数")Sele

  • 阅读下面的程序:Private Sub Form_Click() Dim m n As Integer m=InputBox(请输入M的值) m=Val

  • 运行下列程序:Private Sub form_Click()t = Val(InputBox(请输入一个数:))x = t

  • 阅读程序: Private Sub Form. Click( ) a=0 For j=1 To 15 a=a+j Mod 3 Next j Print a End Sub