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

admin2021-04-07  30

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

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