vb实验指导后题目-参考答案

期末自测题（A卷）

文件部分的选择题要做，其它类型的题目不用做，不作考察

选择题其它部分还没有时间做

一、单选题（每题1分，共25分）

1、211.66.160.1 是Internet上的( )。

(A) IP地址 (B)域名 (C)密码 (D)软件编号

2、在以下四个www网址中，（）网址不符合www网址书写规则。

(A) (B)

(C) (D)

3、下列字符中，其ASCII码值最小的一个是（）。

(A) A (B) a (C) Z (D) X

4、下列软件中属于浏览器的是（）。

(A) Excel (B) Internet Explorer (C) QQ (D) Visual Basic

5、电子邮件(E-mail)地址的正确形式是（）。

(A)用户名@域名 (B)用户名#域名 (C)用户名/域名 (D)用户名.域名

6、下面变量名不合法的是（）。

(A) a2 (B) abcd (C) a$x (D) Cd_E

7、下列表达式中，正确的Visual Basic表达式是（）。

(A) 2sin45° (B) ∏*R2 (C) x÷y×5 (D) （x+1）/（x^2+1）/2

8、下面逻辑表达式的值为真的是（）。

(A) "A"> "a" (B) "abc"> "bc"

(C) "That"> "Thank" (D) 12> 12.1

9、下列过程定义语句说明不合法的是（）。

(A) Sub f1(ByRef n() As Integer) (B) Sub f1(ByRef n As Integer)

(C) Sub f1(ByVal n() As Integer) (D) Sub f1(ByVal n As Integer)

10、执行下面的4个打印语句，将出错的是（）。

(A) Print a = 3 + 5 (B) Print "a="; 3 + 5

(C) Print "a=3+5" (D) Print a=; 3 + 5

11、语句 For i = -3 To 20 Step 4 的循环次数为（）。

(A) 5 (B) 6 (C) 7 (D) 8

12、下列叙述中错误的是（）。

(A) 列表框与组合框都有List属性(B) 列表框与组合框都有Selected属性

(C) 列表框和组合框都有Text属性 (D) 列表框与组合框都有Enabled属性

13、窗体Form1里有两个对象，分别是图片框P1和标签L1。那么下面关于Print方法的使用中，错误的语句为（）。

(A) P1.Print 147 (B) Print 147

(C) Form1.Print 147 (D) L1.Print 147

14、通过设置图像框Image的（）属性，可以自动调整图形的大小，以适应图像框Image的尺寸。

(A) Autosize (B) Stretch (C) AutoRedraw (D) Appearance

15、执行语句 Print Left( "VisualBasic" , 3 )，在窗体上显示的内容是（）。

(A)VVV (B)Vis (C)s (D) sualBasic

16、以下叙述中正确的是（）。

(A) 窗体的Name属性指定窗体的名称，用来标识一个窗体

(B) 窗体的Name属性的值是显示在窗体标题栏中的文本

(C) 可以在运行期间改变对象的Name属性的值

(D) 对象的Name属性值可以为空

17、设x是整型变量，与函数IIf( x > 0 , -x , x )有相同结果的代数式是（）。

(A)|x| (B)-|x| (C) x (D )-x

18、将组合框Combo1当前选中的项目内容赋值给变量S，正确的语句是（）。

(A) S= Combo1.Text (B) S = Combo1.Value

(C) S= Combo1.List (D) S = Combo1.List(0)

19、建立一个图书资料管理输入界面，要求选择图书的借阅情况(借出/未借)、语种（中文/英文/日文/其他）及分类（8类，存在重复分类，一本图书既属于1类，也同时属于2类）。应如何在窗体中利用单选钮和复选框实现（）。

(A) 用一组14个复选框来实现

(B) 将8种分类用一组8个复选框、借阅情况和语种用一组6个单选钮实现

(C) 将8种分类用一组8个单选钮、借阅情况和语种用6个复选框实现

(D) 将8种分类用一组8个复选框、借阅情况用一组2个单选钮、语种用一组4个单选钮实现

20、已知A、B、C中C最小，则判断A、B、C可否构成三角形三条边长的逻辑表达式是（）。

(A) A>=B And B>=C And C>0 (B) A+C>B And B+C >A And C>0

(C)(A+B)>=C And A-B <=C) And C>0 (D) A+B>C And A-B>C And C>0

21、执行（）后，会弹出如下图所示的窗口。

(A) x = InputBox("输入框", "请输入VB数据")

(B) InputBox("输入框", "请输入VB数据")

(C) x = InputBox("请输入VB数据","输入框")

(D) InputBox("请输入VB数据","输入框")

22、窗体有Text1文本框和Command1命令按钮，并有

以下代码：

Private Sub Command1_Click()

Dim n

If Text1.Text <> "123456" Then

n = n + 1

Print "口令输入错误" & n & "次！"

End If

End Sub

希望程序运行时若输入口令不正确，显示出错的次数（如下面

图），但实际运行时没有出现预期效果（如上面图）。修改方案中正确的是（）。

(A)在Dim n后添加一句：n=0

(B)将 Dim n改为Dim n%

(C)将Dim n放到“通用”-“声明”处

(D)将Print "口令输入错误" & n & "次！"改为Print "口令输入错误" + n + "次！"

23、刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（）。