在窗体中变量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的平行四边形
热度🔥704
参考答案：A
解析：
【解析】本题考查for循环知识点。本题第一个for循环用于控制输出的行数，m从1取到5，所以共5行；第二个for循环控制每一行前段空格数目以及字符"*"的个数，每次循环之后空格数逐渐减少，而*逐渐增加。本题输出的是一个高为5的等腰三角形。因此，本题应选择A选项。
【解析】本题考查for循环知识点。本题第一个for循环用于控制输出的行数，m从1取到5，所以共5行；第二个for循环控制每一行前段空格数目以及字符"*"的个数，每次循环之后空格数逐渐减少，而*逐渐增加。本题输出的是一个高为5的等腰三角形。因此，本题应选择A选项。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
决定一个窗体有无"控制"菜单的属性是( )。
有以下函数：
int fun(char *x， char *y)
{ int n＝0；
while ( (*x＝＝*y) && *x！＝'\0' ) {x＋＋； y＋＋； n＋＋；}
return n ；
}
函数的功能是( )。
阅读程序：Private Sub Form_Click() x＝50 For i＝1 To 4 y＝InputBox("请输入一个整数") y＝Val(y) If y Mod 5＝0 Then a＝a＋y x＝y Else a＝a＋x End If Next i Print aEnd Sub程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为( )。
在采用非抢占式调度的操作系统中，不能引起新进程调度的事件是
