模 拟 题 二
一、填空题（120＝20）
1.Visual Basic6.0中应用 可视化的面向对象 的程序设计方法，采用 事件 驱动的编程机制。
2.当进如Visual Basic集体环境，发现没有显示“工具箱”窗口，应选择没有caption属性的控件是 视图 菜单的 选项,使“工具箱”窗口显示。
3.对象的方法是指 对对象可以进行地操作 。
4.Visual Basic6.0中文版的菜单栏共有 13 个菜单项。
5.十进制整型数的表示范围为 -32768～＋32767 。
6.根据所给条件，引出逻辑表达式：
（1）闰年的条件是：年号(year)能被4整除,但不能被100整除；或者能被400整除。逻辑表达式为： NOT(Year MOD 4) AND (Year MOD 100) OR NOT(Year MOD 400)
（2）一元二次方程有实根的条件为：a不等于0且b2-4ac>=0逻辑表达式为： a<>0 AND b^2-4*a*c>=0
7.以下语句的输出结果是 Beijing
S$=＂China＂
S$=＂Beijing＂
Print S $
8.列表框中项目的序号是从 0 开始的， ListCount-1 表示列表框中最后一项的序号。
9.控件数组的名字由 Name 属性指定，而数组中的每个元素由 Index 属性指定。
10.为了在运行时把图形文件Pf.jpg装入图片框Picture1，所使用的语句为_Pictuer1.Pictuer=LoadPictuer(Pf.jpg)___________。
11.制作菜单的分隔栏时，选用的符号是___-____。
12.Visual Basic提供的对数据文件的三种访问方式为随机访问方式_顺序访问方式__和二进制访问方式。
13. Data 控件是Visual Basic 6.0和数据库之间的桥梁，而 数据绑定 控件则把Data控件和用户界面联系起来，两者构成了Visual Basic 6.0开发数据库的主体。
二、选择题（219=38）
1.可以用来在启动程序时对属性和变量进行初始化的事件( D )
A Click B Unload
C Activate D Load
2.当窗体上有多个控件时，最多只有( A )个控件是活动的。
A 1 B 2
C 3 D 多
3.当对被选择的控件进行对齐、调整大小等操作时，将以( C )为准。
A 所有控件 B 某些控件
C 基准控件 D 以上说法均不对
4.Visual Basic中的语句通常按“一行一句，一句一行”的规则书写，但也允许多个语句放在同一行中。在这种情况下，用来隔开各语句的符号是( A )
A 冒号 B 分号
C 逗号 D 感叹号
5.一般来说，在用Visual Basic开发应用程序时，其通常的步骤为( A )
A ①设置可视界面 ②编写代码 ③程序测试、运行
B ①建立可视用户界面 ②设置可视界面特性 ③编写事件驱动代码
C ①编写事件驱动代码 ②程序测试 ③程序运行和维护
D 以上步骤均不对
6.下面4个选项中属于字符型数据的是( A )
A “Hello” B `Hello`
C Hello D #Hello
7.双精度浮点数存储时占的字节数是( B )
A 4 B 8
C 16 D 32
8.下面为正确的整型常量的是( C )
A &624 B 0347
C &0127 D &0128
9.把小写字母转换为大写字母的函数是( B )
A Lcase$ B Ucase$
C Instr D Len
10.“x是小于100的非负数”，用Visual Basic表达式表示正确的是( C )
A 0<=x<100 B 0<=x<100
C 0<=x And x<100 D 0<=x Or X<100
11.假定Picture1和Text1分别为图片框和文本框的名称，下列语句不正确的是( C )
A Print 100 B Picture1.Print 100
C Text1. Print 100 D Debug. Print 100
12.表达式4+5\6*7/8Mod9的值是( B )
A 4 B 5
C 6 D 7
13.在窗体上画一个命令按钮,然后编写如下事件过程：( D )
Private Sub C ommand1_Click( )
a=InputBox(＂Enter the First Integer＂)
b=InputBox(＂Enter the Second integer＂)
Print b+a
End Sub
程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是 A 579 B 123
C 456 D 123456
14.若要使标签控件显示时不覆盖其背景内容，要对其设置的属性是（ D）
A BackColor B BorderStyle
C ForeColor D. BackStyle
15.下面程序
x$=＂a＂
y$=＂b＂
z$=＂c＂
For I=1 to 2
X$=y$：y$=z$：z$=x$
Next I
Print x$+y$+z$
运行后的输出结果是（D ）
A cab B bca
C bcb D cbc
16.下面程序段
For I=1 To 3 Step 1
Print Spc(5-I);
For j=1 To 2*I-1
Print ＂*＂;
Next j;
Print
Next I
运行结果为（B ）
A * * * * * B *
* * * * * *
* * * * * *
C * D *
* * * * * *
* * ** * * * * * * * * *
17.设有语句
open "c：Test．Dat" For OutPut As#1
则以下错误的叙述是 （ A ）
A)该语句打开C盘根目录下一个己存在的文件Test．Dat
B) 该语句在C盘根目录下建立一个名为Test．Dat的文件
C) 该语句建立的文件的文件号为1
D)执行该语句后，就可以通过Print#语句向文件Test．Dat中写入信息
18.表的每一行就是一个（ A ）；表中的每一列称作一个（ ），描述了它所含有的数据。
A.记录 字段
B.索引 字段
C.字段 记录
D.记录 索引
19.Data控件的很多方法，当我们在运行时修改了Record-Source属性后，需要调用（ A ）方法刷新记录集。
A.Refresh方法
B.UpdateRecord方法
C.UpdateControls方法
D.Cancelupdate方法
三、程序填空题（218＝34）
1．下面的程序段是检查输入的文字段中大括号是否配对，并显示相应的结果．本程序在文本框中边输入边统计大括号的个数，以+输入回车作为结束标志，然后显示结果．请将程序补充完整．
Dim Count1%
Private Sub Text1_KeyPress(Key Ascii As Integer)
If Key Ascii =＂{＂Then
Count1=Count1+1
Else If Key Ascii =＂}＂ Then
Count1=Count1+1
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论