计算机二级
在窗体上画一个命令按钮，然后编写下列程序： Private Sub Command1 click( ) Dim a As Single，b As Single a=6:b=2 RC a，b Print a，b End Sub Sub RC(x As Single，y As Single) i=x x=i/y y=i Mod y End SubA．4 3B．1 1C．3 0D．2 6
题目
在窗体上画一个命令按钮，然后编写下列程序： Private Sub Command1 click( ) Dim a As Single，b As Single a=6:b=2 RC a，b Print a，b End Sub Sub RC(x As Single，y As Single) i=x x=i/y y=i Mod y End Sub
A．4 3
B．1 1
C．3 0
D．2 6
相似问题和答案
第1题：
在窗体上画一个命令按钮，然后编写如下程序：
Dim x As Integer
Sub inc(a As Integer)
x=x+a
End Sub
Private Sub Command1_Click()
inc 2
inc 3
inc 4
Msgbox x；
End Sub
程序执行后，单击Command1命令按钮，消息框显示结果是【 】。
9 解析：inc函数每执行一次就向x上累加一次传入的参数，所以最后x的值为：2+3+4=90
第2题：
在窗体上画一个命令按钮，然后编写如下程序(假定变量x是—个窗体级变量)
Dim x As Integer
Sub inc(a AS Integer)
X=K+a
End Sub
Private Sub Command1_Click()
inc2
inc3
inc4
Prmt x；
Ead Sub
程序执行后，单击Command1命令按钮，输出的结果是【 】。
9 解析：inc函数每执行一次就向x上累加一次传入的参数，所以最后x的值为：2+3+4=9。
第3题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是______。
A．VVV
B．Vis
C．sic
D．11
解析：函数string(n，字符串)的功能是返回由n个指定“字符串”中第一个字符组成的字符串。本题中的字符串“VisualBasic”的第一个字符为“V”，所以返回3个“V”，即String函数返回的字符为“VVV”。
第4题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3，a＄) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是
A．VVV
B．Vis
C．sic
D．11
解析：String返回n个字符。如果为字符串，则返回n个字符串的首字符。返回3个"VisualBasic”的首字母“V”。
第5题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1_Click() For i=1 To 2 For j=1 To i Print String(i,"Hello") Next j Print Next i End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。
A．H HH HH
B．H HHHH
C．HHHHH HH HHHH
D．H
解析：分析程序，程序开始循环时i=1，j=1to1，PrintString(i,"Hello")语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2,PrintString(i,"Hello")语句精出两行分别为两个HH，然后执行Print换行；当i=3时，退出循环。
第6题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub Commandl_Click( )
Static X As Integer
Static Y As Integer
Cls
Y=1
Y=Y+5
X=5+X
Print X, Y
End Sub
程序运行时，3次单击命令按钮Command1后，窗体上显示的结果为【 】。
15 6 解析：在本题过程中使用了两个Static变量，其中的变量Y每次都被重新赋值，因此不管执行多少次，Y的结果只会是6；而变量X的值则一直累计，执行3次后，x为15。
第7题：
在窗体上画一个命令按钮，其名称为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
解析：解题的关键是掌握对格式说明字符的理解。0表示一个数字位，0的个数决定了显示区段的长度，多余的位以0补齐；小数点与O结合使用，可以放在显示区段的任何位置，根据格式字符串的位置，小数部分多余的数字按四舍五入处理。由于本题中变量a为12345，并没有涉及小数，故可以直接在其后补两个0。
第8题：
在窗体上画一个命令按钮，名称为Command1，然后编写下列程序：
Private Sub Command1_Click()
For i=1 To 2
For j=1 To i
Print String(i,"Hello")
Next j
Next i
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A)B)C)
D)H
A．H HH HH
B．H HHHH
C．HHHH
D．H
解析：分析程序，程序开始循环时i=1,j=1 to 1,Print String(i,"Hello")语句输出一个H，然后执行Print进行换行；当i=2时，j=1 to 2，Print String(i,"Hello")语句输出两行分别为两个HH，然后执行Print换行；当i=3时，退出循环。
第9题：
在窗体上画一个命令按钮，其名称为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
解析：对于符号“0”，实际数字小于符号位数时，数字前后加0；大于时，若要显示数值表达式的整数部分位数多于格式字符串的位数，按实际数值显示。若小数部分的位数多于格式字符串的位数，按四舍五入显示。
第10题：
在窗体上画一个命令按钮，其名称为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