窗体中有文本框Textl。运行程序,输入大于0的整数m,单击按钮Commandl,程序显示由星号组成的高度和上底均为m的等腰梯形形。例如,当m=5时,显示图形如下。 * * * * *

admin2020-06-06  30

问题 窗体中有文本框Textl。运行程序,输入大于0的整数m,单击按钮Commandl,程序显示由星号组成的高度和上底均为m的等腰梯形形。例如,当m=5时,显示图形如下。
                      * * * * *
                    * * * * * * *
                  * * * * * * * * *
                * * * * * * * * * * *
              * * * * * * * * * * * * *
事件代码如下。
  Private Sub Commandl_Click()
    m=Val(Me!Textl)
    result=””
    For k=1 To m
    For n=l To【    】
    If n<m—k+l Then
    result=result&””
    Else
    resuh=result&”*”
    End If
    Next n
    result=result+Chr(13)
    Next k
    MsgBox result,,”运行结果”
    End Sub
    程序【    】处应填写的语句是(    )。

选项 A、k+2*m一2
B、k+2*m
C、k+m一1
D、k+m

答案A

解析 本题考查的是for循环执行过程,通过for循环输出等腰梯形。第一个循环用于控制输出的行数,第二个for循环用于控制每行输出的字符数。从图中可看出,第l行,4个空格,5个*字符;第2行,3个空格,7个*字符;第3行,2个空格,9个*字符;第4行,1个空格,11个*字符;第5行,0个空格,13个*字符;可看出行号与输出空格关系,假定有输入的为整数m,第k行,应输出m—k个空格;同理,第k行,应输出k+2*m一2个*号字符。故选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/K40p777K
0

最新回复(0)