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

admin2019-02-19  23

问题 窗体中有文本框TPxt1。运行程序,输入大于0的整数m,单击按钮Command1,程序显示由星号组成的高度和上底均为m的等腰梯形形。例如,当m=5时,显示图形如下。
     *****
    *******
   *********
  ***********
*************
事件代码如下。
Private Sub Command1_Click()
  m= Val(Me! Text1)
  result  = ""
  For k=1 To m
    For n=l To【】
    Ifn<m-k+1 Then
    result=result&""
    Else
    result=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循环用于控制每行输出的字符数。从图中可看出,第1行,4个空格,5个*字符;第2行,3个空格,7个*字符;第3行,2个空格,9个*字符;第4行,1个空格,1 1个*字符;第5行,0个空格,13个*字符;可看出行号与输出空格关系,假定有输入的为整数m,第k行,应输出m—k个空格;同理,第k行,应输出k+2 *m —2个*号字符。故选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/Kh0p777K
0

相关试题推荐
随机试题
最新回复(0)