在窗体上面一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer, s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a＜=0 Print s; a End Sub 程序运行后，单击命令按钮．则窗体上显示的内容是______。A．7 9B．34 0C．9 7D．死循环

题目

在窗体上面一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer, s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a＜=0 Print s; a End Sub 程序运行后，单击命令按钮．则窗体上显示的内容是______。

A．7 9

B．34 0

C．9 7

D．死循环

如果没有搜索结果或未解决您的问题，请直接联系老师获取答案。

相似问题和答案

第1题：

在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() b=5 c=6 Print a=b+c End Sub 程序运行后，单击命令按钮，输出的结果是 ______。

A．a=11

B．a=b+c

C．a=

D．假

正确答案：D
解析：在本题中，变量a未定义，因此初始值为0，在表达式a=b+c中，a=0，b+c=5+6=11，所以表达式的值为False，程序的输出结果为False。

第2题：

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Sum=0 For x=1 To 5 Call subl(x, s) Sum=Sum+s Next x Print Sum End Sub Private Sub subl(y, w) w=1 For i=1 To y w=w*i Next i End Sub 程序运行后。单击命令按钮，则窗体上显示的内容是______。

A．5

B．120

C．153

D．160

正确答案：C
解析：由于参数y、w是ByRef的参数，称为“引用”，所以在过程Subl中改变的值是带回到调用的地方的，因此Sum结果是5次Subl计算结果的和，即sum=(1+2+6+24+120)=153。本题答案为153。

第3题：

在窗体上有一个命令按钮，其名称为Command1。要实现程序运行后，单击命令按钮，如果在输入对话框里分别输入12和4，编写如下事件过程：

Private Sub Command1_Click()

A=InputBox("被除数")

B=InputBox("除数")

Print A；"÷"；B；"="；A / B

End Sub

则窗体中显示的内容是______。

正确答案：12÷4=3
12÷4=3

第4题：

在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：

Private Sub Command1_Click（）

Dim s，i

For i=1 To 10

s=s+i

Next i

MsgBox s

End Sub

窗体打开运行后，单击命令按钮，则消息框的输出结果为。

正确答案：

第5题：

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是______。

A．VVV

B．Vis

C．sic

D．11

正确答案：A
解析：函数string(n，字符串)的功能是返回由n个指定“字符串”中第一个字符组成的字符串。本题中的字符串“VisualBasic”的第一个字符为“V”，所以返回3个“V”，即String函数返回的字符为“VVV”。

第6题：

在窗件上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format S(a, "000. 00") End Sub 程序运行后，单击命令按钮，窗体上显示的是______。

A．123.45

B．12345.00

C．12345

D．00123.45

正确答案：B
解析：在使用Format函数使数值按“格式字符串”指定的格式输出时，符号“#”和“0”都是用于数字的输出，其个数决定了显示区段的长度。如果要显示的数值的位数小于格式字符串指定的区段长度，则该数值靠区段的左端显示，但这两个功能的区别在于，“#”显示的多余的位不补0，“0”显示的多余的位以0补齐。

第7题：

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub subl(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x*x+y*y End Sub Private Sub Command1_Click() Dim a As Integer a=8 Call subl(1, 2,a) Print a End Sub 程序运行后，单击命令按钮，则窗体下显示的内容是______。

A．8

B．2

C．5

D．11

正确答案：A
解析：因为Subl过程的形参都是传值传送，所以在其内的所有计算结果都不将返回，并不影响对应的实参值，变量a的值并没有改变，仍然是8。

第8题：

在窗体上画一个名称为 \"Command1\" 的命令按钮，然后编写如下事件过程：

Private Sub Command1_Click（）

Dim a As String

A="123456789"

For i=1 To 5

Print Space（6-i）;Mid $ （a,______ ,2*i-1）

Next i

End Sub

程序运行后，单击命令按钮，窗体上的输出结果是

456

34567

2345678

123456789

请填空。

正确答案：

6-i
MiD $( 字符串，起始位置 \[ ，个数 \]) 函数用于取出字符串从指定位置开始的含指定个数字符的字符串。本题 MiD $ 的作用在于依次取出字符串居中位置的 1 、 3 、 5 、 7 、 9 个字符。故取字符串起始位置为 6-i ，即依次为 5 、 4 、 3 、 2 、 1 。

第9题：

在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程； Private Sub Command1_Click() a $="software and hardware" b $=Right(a$, 8) c $=Mid(a$, 1, 8) MsgBox a$, ,b$,c$,1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是______。

A．software and hardware

B．software

C．hardware

D．1

正确答案：C
解析：MsgBox语句可以向用户传递信息，它有5个参数，其中第三个应该是一个字符串，用来显示对话框的标题，即b$，Right()函数返回字符串右边指定长度的字符串，所以为“hardware”。

第10题：

在窗体上添加一个命令按钮，名称为Command1，然后编写如下程序：

Private Sub Command1_Click()

sum=0

For i=1 To 100 step 2

sum=sum+i

Next i

MsgBox sum

End Sub

打开窗体运行后，单击命令按钮，则消息框的输出结果为_______。

正确答案：2500
2500 解析：本题考查循环的知识。这个问题比较简单，实际上就是求1到100之间的奇数和，最终结果为2500。

在窗体上面一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Di

题目

相似问题和答案

更多相关问题

相关内容