VB考试练习题.doc

VB考试一 1、能够获得一个文本框中被选取文本的内容的属性是______。 A：SelStart B：SelLength C：SelText D：Text 参考答案：C 2、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应当使用的语句为：______。 A：Text1.Enabled = False B：Text1.Hide C：Text1.Clear D：Text1.Visible = False 参考答案：D 3、对于语句 If x=1 Then y=1, 下列说法正确的是____。 A： x=1和y=1 均为赋值语句 B： x=1和y=1 均为关系表达式 C： x=1为赋值语句，y=1为关系表达式 D： x=1为关系表达式，y=1 为赋值语句 参考答案：D 4、以下变量名中，______是不符合Visual Basic的命名规范的。 A：_mnu_Open_234 B：Abc901 C：price_ D：K 参考答案：A 5、MsgBox 函数返回值的类型是__________。 A：数值或字符串 B：字符串 C：变体 D：整型数值 参考答案：D 6、VB一共有设计、运行和中断三种模式，要使用调试工具应该______。 A：进入中断模式 B：进入运行模式 C：进入设计模式 D：不用进入任何模式 参考答案：A 7、设a=6，则执行 x=IIF(a5,-1,0) 后，x的值为______。 A：-1 B：6 C：0 D：5 参考答案：A 8、可以同时删除字符前导和尾部空白的函数是______。 A：Mid B：Rtrim C：Trim D：Ltrim 参考答案：C 9、以下语句的输出结果是______。 Print Format$(32548.5,000,000.00) A：32,548.5 B：32548.5 C：032,548.50 D：32,548.50 参考答案：C 10、设有如下声明： Dim X As Integer 如果Sgn(X)的值为-1，则X的值是______。 A：等于0的整数 B：大于0的整数 C：整数 D：小于0的整数 参考答案：D 11、在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i = 1 To 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 x End Sub 程序运行后，单击命令按钮，输出结果是______。 参考答案： 15# 15 #15 #15 12、执行下面的程序段后，S的值为______。 s=5 For i=2.6 To 4.9 Step 0.6 s=s+1 Next i 参考答案：9 13、下列表达式有错误,正确的写法应该是______。 [(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的倍数的逻辑表达式为__________ 参考答案：x Mod 5 = 0 Or x Mod 9 = 0#x Mod 9 = 0 Or x Mod 5 = 0 15、以下程序的功能是:从键盘上输入若干个数字，当输入负数时结束输入，统计出若干数字的平均值，输出结果。请填空。 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 If y = ______ Print y End Sub 参考答案：y/z VB考试二 1、列表框中的列表项的数目可以通过以下哪个属性的值获得______。 A：ListIndex B：ListCount C：Count D：Index 参考答案：B 2、在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。 A：Private Sub List1_Click() Label1.Caption=List1.Text End Sub B：Private Sub List1_Click() Label1.Name=List1.ListIndex End Sub C：Private Sub List1_Click