在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(4)As Integer, x As Integer, sum As Integer n = 4: sum = 0 a (1) = 1 For k = 0 To n - 1 For i = 1 To k + 1 x = k + 2 - i a(x)= a(x)+ a(x - 1) If x ＜ n - k Then Exit For sum = sum + a(x
题目
在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(4)As Integer, x As Integer, sum As Integer n = 4: sum = 0 a (1) = 1 For k = 0 To n - 1 For i = 1 To k + 1 x = k + 2 - i a(x)= a(x)+ a(x - 1) If x ＜ n - k Then Exit For sum = sum + a(x) Next i Next k Print sum End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．5
B．6
C．8
D．11
相似考题
更多“在窗体上画一个名称为 Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() ”相关问题
-
第1题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A．
B．H
C．
D．
正确答案：A
【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。 -
第2题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是
A． 123.45
B．12345.00
C．12345
D．00123.45
正确答案：B
解析：对于符号“0”，实际数字小于符号位数时，数字前后加0；大于时，若要显示数值表达式的整数部分位数多于格式字符串的位数，按实际数值显示。若小数部分的位数多于格式字符串的位数，按四舍五入显示。 -
第3题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3，a＄) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是
A．VVV
B．Vis
C．sic
D．11
正确答案：A
解析：String返回n个字符。如果为字符串，则返回n个字符串的首字符。返回3个"VisualBasic”的首字母“V”。 -
第4题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：
Private Sub Command1_Cilck()
End Sub
运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是( )。
正确答案：hardware
hardware -
第5题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format$(a,"000,00") End Sub 程序运行后，单击命令按钮，窗体上显示的是( )。
A．123.45
B．12345.00
C．12345
D．00123.45
正确答案：B
-
第6题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click（）
a = 12345
Print Format$（a, "000.00"）
End Sub
程序运行后，单击命令按钮，窗体上显示的是（ ）。
A．123.45
B．12345.00
C．12345
D．00123.45
正确答案：B