《VB考试题库-二级习题(含答案).doc》由会员分享，可在线阅读，更多相关《VB考试题库-二级习题(含答案).doc（29页珍藏版）》请在金锄头文库上搜索。
1、VB考试一1、能够获得一个文本框中被选取文本的内容的属性是_。 A：SelStart B：SelLength C：SelText D：Text参考答案：C2、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应当使用的语句为：_。 A：Text1.Enabled = False B：Text1.Hide C：Text1.Clear D：Text1.Visible = False参考答案：D3、对于语句 If x=1 Then y=1, 下列说法正确的是_。 A： x=1和y=1 均为赋值语句 B： x=1和y=1 均为关系表达式 C： x=1为赋值语句，y=1为关系表达式
2、 D： x=1为关系表达式，y=1 为赋值语句参考答案：D4、以下变量名中，_是不符合Visual Basic的命名规范的。 A：_mnu_Open_234 B：Abc901 C：price_ D：K参考答案：A5、MsgBox 函数返回值的类型是_。 A：数值或字符串 B：字符串 C：变体 D：整型数值参考答案：D6、VB一共有设计、运行和中断三种模式，要使用调试工具应该_。 A：进入中断模式 B：进入运行模式 C：进入设计模式 D：不用进入任何模式参考答案：A7、设a=6，则执行 x=IIF(a5,-1,0) 后，x的值为_。 A：-1 B：6 C：0 D：5参考答案：A8、可以同时删除字
3、符前导和尾部空白的函数是_。 A：Mid B：Rtrim C：Trim D：Ltrim参考答案：C9、以下语句的输出结果是_。 Print Format$(32548.5,000,000.00) A：32,548.5 B：32548.5 C：032,548.50 D：32,548.50参考答案：C10、设有如下声明：Dim X As Integer如果Sgn(X)的值为-1，则X的值是_。 A：等于0的整数 B：大于0的整数 C：整数 D：小于0的整数参考答案：D11、在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() For i = 1 T
4、o 4 x = 4 For j = 1 To 3 x = 3 For k = 1 To 2 x = x + 6 Next k Next j Next i Print xEnd Sub程序运行后，单击命令按钮，输出结果是_。参考答案： 15# 15 #15 #1512、执行下面的程序段后，S的值为_。 s=5 For i=2.6 To 4.9 Step 0.6 s=s+1 Next i参考答案：913、下列表达式有错误,正确的写法应该是_。 (a+b)+c/80-5(d+e)参考答案：(a+b+c)/80-5/(d+e)#（a+b+c）/80-5/（d+e）14、表示x 是5的倍数或是9的倍数的
5、逻辑表达式为_参考答案：x Mod 5 = 0 Or x Mod 9 = 0#x Mod 9 = 0 Or x Mod 5 = 015、以下程序的功能是:从键盘上输入若干个数字，当输入负数时结束输入，统计出若干数字的平均值，输出结果。请填空。Private Sub Form_click() Dim x, y As Single Dim z As Integer x = InputBox(Enter a score) Do while x=0 y = y + x z = z + 1 x = InputBox(Enter a score) Loop If z = 0 Then z = 1 End
6、If y = _ Print yEnd Sub参考答案：y/zVB考试二1、列表框中的列表项的数目可以通过以下哪个属性的值获得_。 A：ListIndex B：ListCount C：Count D：Index参考答案：B2、在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是_。 A：Private Sub List1_Click() Label1.Caption=List1.Text End Sub B：Private Sub List1_Click() L
7、abel1.Name=List1.ListIndex End Sub C：Private Sub List1_Click() Label1.Name=List1.Text End Sub D：Private Sub List1_Click() Label1.Caption=List1.ListIndex End Sub参考答案：A3、在列表框中当前被选中的列表项的序号是由下列哪个属性表示_。 A：Listindex B：Index C：List D：Tabindex参考答案：A4、为了清除列表框中的所有内容，应使用的方法是：_。 A：Clear B：Remove C：RemoveItem D：
8、Cls参考答案：A5、在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为_。 A：For i=1 To List1.ListCount NEXT B：For i=0 To List1.Count-1 NEXT C：For i=0 To List1.ListCount-1 NEXT D：For i=1 To List1.Count NEXT参考答案：C6、设有如下程序：Option Base 0Private Sub Form_Click() Dim a Dim i As Integer a = Array(1, 2, 3, 4, 5, 6, 7,
9、8, 9) For i = 0 To 3 Print a(5 - i); NextEnd Sub程序运行后，单击窗体，则在窗体上显示的是_。 A： 6 5 4 3 B： 5 4 3 2 C： 4 3 2 1 D： 7 6 5 4参考答案：A7、设执行以下程序段时依次输入1、3、5，执行结果为_。 Dim a(4) As Integer, b(4) As Integer For K = 0 To 2 a(K + 1) = Val(InputBox(请输入数据) b(3 - K) = a(K + 1) Next K Print b(K) A： 0 B： 3 C： 5 D： 1参考答案：D8、在窗体
10、上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1_Click() Dim i As Integer,j As Integer Dim a(10,10) As Integer For i=1 To 3 For j=1 To 3 a(i,j)=(i-1)*3+j Print a(i,j); Next j Print Next iEnd Sub程序运行后，单击命令按钮，窗体上显示的是_。 A： 1 2 3 4 5 6 7 8 9 B： 2 3 4 3 4 5 4 5 6 C： 1 4 7 2 5 8 3 6 9 D： 1 2 3 2 4 6 3 6
11、 9参考答案：A9、用下面的语句所定义的数组的元素个数是：_。Dim arr(3 To 5,-2 to 2) A：24 B：12 C：15 D：20参考答案：C10、下列_语句可以为动态数组分配实际元素个数。 A：static语句 B：Dim语句 C：public语句 D：ReDim语句参考答案：D11、假定程序中有以下语句： answer = MsgBox(String1,String2,String3,2)执行该语句后，将显示一个信息框，此时如果单击确定按钮，则answer的值为：_。 A：String3 B：String2 C：String1 D：1参考答案：D12、设有语句x=Inpu
12、tBox(输入数值,0,示例)程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是_。 A：0是默认值 B：变量X的值是字符串10 C：在InputBox对话框标题栏中显示的是示例 D：变量X的值是数值10参考答案：B13、以下程序段运行的结果是：_。 Dim a(-1 To 5) As Boolean Dim flag As Boolean flag = False Dim i As Integer Dim j As Integer Do Until flag = True For i = -1 To 5 j = j + 1 If a(i) = False Then a(i) = True Exit For
