2. 计算机
  3. 在窗体中变量m对应的文本框为Text1，"运行"按钮Command1对应的事件代码如下： Private Sub Command1_Click() Dim result As String m = Val(Me!Text1) res

在窗体中变量m对应的文本框为Text1，"运行"按钮Command1对应的事件代码如下： Private Sub Command1_Click() Dim result As String m = Val(Me!Text1) res

admin2020-09-01  35
问题 在窗体中变量m对应的文本框为Text1，"运行"按钮Command1对应的事件代码如下：
Private Sub Command1_Click()
    Dim result As String
    m = Val(Me!Text1)
    result = ""
    For k = 1 To m
        For n = 1 To k + m - 1
            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
单击运行按钮后，输入m的值为5，程序的运行结果是
选项 A、由星号组成的高为5的等腰三角形
B、由星号组成的高为5的等腰梯形
C、由星号组成的边长为5的平行四边形
D、由星号组成的边长为10的平行四边形
答案A
解析 本题考查是for循环知识点，本题第一个for循环用于控制输出的行数，m从1取到5，所以共5行；第二个for循环控制每一行前段空格数目以及字符"*"的个数，每次循环之后空格数逐渐减少，而*逐渐增加。本题输出的是一个高为5的等腰三角形。因此，本题应选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/ercp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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