VB期末练习题含答案.doc
文本预览下载声明
练习题一
一、选择题
1、假设变量bool_flag是一个布尔型(逻辑型)的变量，则下面正确的赋值语句是（ ）
A）bool_flag=False B） bool_flag= .False.
C）bool_flag=#False# D） bool_flag=False
2、限制文本框输入的字符不超过15个，应设置文本框的（ ）属性。
A） maxlength B） visible C） caption D） name
3、表达式Len(123程序设计ABC)的值是（ ）。
A） 10 B） 14 C） 20 D） 17
4、设有数组声明语句：
Option Base 0
Dim B(-1 To 1,2 To 4,2) As Integer
则数组B中共有（ ）个元素。
A）27 B）36 C）12 D）24
5、清除列表框中的所有内容用（ ）方法。
A）Clear B）RemoveItem C） Print D）AddItem
6、表达式 5 Mod 3+7\2的值是（ ）。
A）2 B）4 C）5 D）6
7、设S=“中华人民共和国”，表达式Left（S,1）+Right（S,1）+Mid（S,3,2）的值为（ ）
A）“中华民国” B）“中国人民” C）“中共人民” D）“人民共和”
8、下列表达式的值为2123的是（ ）
A）Val(123asd) 2000 B） Val(123asd) + 2000
C）Str(123) 2000 D）Str(123)+2000
9、如下数组声明语句，（ ）是正确的。
A）Dim a[3,4] As Integer B）Dim a(3,4) As Integer
C）Dim a(n,n) As Integer D）Dim a(3 4) As Integer
10、下列叙述不正确的是（ ）。
A）InputBox函数返回值为字符型
B）MsgBox函数返回值为所单击按钮的键值
C）MsgBox语句返回值为所单击按钮的键值
D）Shell函数返回值为所执行文件的工作代码
11、下列各程序段中，语法正确的是（ ）
A） If a 10 Then a=a+10
B） If a 10 Then a= a+1 Else a= a+ 5 End If
C） If a =10 Then a=a + 1
Else
End If
D）If a =10 Then
a=a + 1
Else If a =20 Then
a=a + 10
End If
12、假设X的值为5，则在执行以下语句时，其输出结果为“OK”的Select Case语句是（ ）
A） B．
D）
13、有如下程序
Private Sub From_Activate()
Dim a
a=Array(1 ,2 ,3, 4, 5)
For i=LBound(a) To UBound(a)
a(i)=i*a(i)
Next i
Print i,LBound(a),UBound(a),a(i)
End Sub
A）4 0 4 25 B）5 0 4 25 C）不确定 D）出现下标越界的错误
14、下面程序运行后，窗体Form1中输出的结果是Private?Sub?Form_Load( ) Form1.AutoRedraw=True x= -17.8 Print?Sgn(x)*Int(Abs(x))
End?Sub
A）-17 B）17 C）-18 D）18
15、在窗体上画一个命令按钮，然后编写如下事件过程： Private?Sub?Command1_Click( ) A=″12
显示全部