t=x
x=变量
y=t
EndIf
其中变量为：
A.tB.0C.xD.y
24.下面哪一个是错的。
应用程序窗口由c
A.标题栏B.菜单栏C.代码窗口D.工具栏
组成.
25.Aspect表示纵轴和横轴的尺寸比。
Aspect＜1表示A
A.在x轴方向画椭圆B.在y轴方向画椭圆
C.在x轴方向画双曲线D.在y轴方向画双曲线
26.DimA（-3To4,1To2,3To5,-1To6）AsIntegerd
UBound（A，3）测试A第三维上界为
A.4B.6C.3D.5
27.二进制文件，直接将二进制代码（0、1的组合）存入文件，b
A.按字随机访问文件中的数据。
B.按字节随机访问文件中的数据。
C.按字节顺序访问文件中的数据。
D.按字顺序访问文件中的数据。
28.Append
D
A.新建文件。
B.新建或打开一个文件，进行读操作。
C,打开一个文件D.新建或打开一个文件，进行写操作。
29.A.关键字又称变量名。
cB.关键字又称常量名。
C.关键字又称保留字。
D.关键字又称函数名。
二填空题
1.图片框的Autosize属性，决定控件是否（自动）适应图片的大小。
2.滚动条LargeChange，用户单击滚动条的（空白处），滑块移动的增量值。
3.选择法是在每一轮排序时找最小（递增顺序）数的下标，出了内循环（一轮排序结束），再
交换（最小数）的位置。
4.在调用过程时，过程中使用的是实际参数，它要与定义过程时的形式参数（一一对应），并以
适当的形式将实参传给形参，这便是参数传递。
5．Input，打开一个文件，进行（读操作）。
.
6.VisaulBasic中的对象分为窗体和（控件）两大类。
7.所谓对象的“事件”，就是由VB（预先）设计好的，能被对象识别的动作。
8.标签主要用于显示一小段文本,通常用来标注本身不具有（caption）属性的控件。
9.控件的默认属性是指在程序运行时,不必（指定）控件的属性名就可改变其值的属性。
10.变量的数据类型决定了如何将代表这些值的位（存储）到计算机的内存中。
11.Variant型是声明变量时的（变体数据）类型，能够存储所有类型的数据。
12.滚动条SmallChange，用户单击滚动条两端箭头时,滑块（移动）的增量值.
13.动态数组在定义时并不知道数组的大小，要在（运行时）确定，并根据需要在运行期可改变
数组的大小。
14.Action属性，返回或设置（被显示）对话框的类型。
15.OutPut，新建或打开一个文件，进行（写操作）。
16.VB控件分为：
内部控件、Active控件、（可插入）对象
17.只能在程序代码中使用的属性，称为对象的（动态）属性。
18.所谓对象的“方法”，是一些可由对象（调用）的特殊过程，它将使调用者完成规定的操作。
19.只有窗体内的所有控件都（不能）接受焦点时，窗体才能接受焦点。
20.在VisualBasic中，凡是涉及数据就与数据类型有关，包括：
变量、常量、数组，
以及（函数）、过程中的参数。
21.所谓“对象”，即指任何具体的事物，是应用程序的基本运行（实体）。
22.除了在属性窗口里设置对象属性外，也可以通过语句在程序中（动态）设置。
23.事件驱动程序设计
1启动应用程序,装载和显示窗体
②窗体或窗体上的对象（等待）事件的发生
③事件发生时,执行相应的事件过程
④重复执行步骤②和③
24.焦点是指控件对象（接受）鼠标或键盘输入的能力。
25.所有变量都具有（数据类型），以决定能够存储哪种数据。
26.通过设置Shape属性可以得到需要的（图形）。
27.列表框名.AddItem项目字符串［，位置值］。
该方法是将项目字符串所指定的一个项目
（插入）到由位置值所指定的位置上。
28.滚动条Value，滚动条内（滚动块当前）所处位置所代表的值。
29.冒泡法在每一轮排序时将（相邻的数进行）比较，当次序不对就交换位置，出了内循环，最小数已
冒出。
30.弹出式菜单，是一种独立于菜单栏而显示在窗体上的（浮动菜单。
I
三判断对错题（对的写对，错的写错）
1.直线控件的BorderStyle用于设置属性的类型.x
2.数组是由一定数目的同类元素按一定顺序排列而成的结构类型数据。
v
3.动态数组的定义通常分三步完成。
x
4．引用的下标比数组声明时的下标范围大或小。
x
Dima（1To30）AsLong,i%
a
（1）=1:
a
（2）=1
Fori=2To30
a（i）=a（i-2）+a（i-1）
Nexti
5.VB不区分常量或变量名中的大小写字母v
6.删除控件时，选择窗体上的一个或一批控件，执行“删除”菜单命令或按“Delete”键。
v
7.有的对象的属性在属性窗口中没有列出，不能在运行时由程序代码进行设置，修改，或读
取使用。
x
8.在一个窗体中，允许有几个按钮的Cancel属性设为True。
X
9.不是所有的控件都能接受焦点。
v
10.Boolean的缺省值为True。
x
11.不能使用VB中的关键字命名常量或变量.v
12.ReDim用来重新定义静态数组的大小。
v
13.Dimx（10）AsIntegerv
x（10）=100
14.传址，形参与对应实参用相同的内存地址，形参的改变将影响实参，形参实际上是实参的
别名。
v
15.字符串中的字符靠ASCII码识别，故大小写是没有区别的x
16.VB中任何一个对象（窗体和控件），都通过称为属性的一组有一定含义的数据加以限定。
v
17.对象不会自动识别事件是否发生。
x
18.具有焦点的控件对象不能接受用户由鼠标和键盘的输入。
X
19.在VB中,运行程序有两种模式，即编译运行模式和解释运行模式.v
20.如果把数据赋予Variant变量，则必须在这些数据的类型间进行转换。
x
21.添加控件。
双击工具箱上所需的控件图标，则立即在窗体上出现一个默认大小的对象框。
v
22.事件仅仅是几个动作。
x
23.VB是采用事件驱动的编程技术。
v
24.当失去焦点时，将触发LostFocus事件。
v
25.“ABC”与“abc”是相同的字符串.x
26.Tmax=If（x>y，x，y）V
27.SelectCasex,yx
Casex>0Andy>0
Print"在第一象限"
Casex<0Andy>0
Print"在第二象限"
Casex<0Andy<0
Print"在第三象限"
Casex>0Andy<0
Print"在第四象限"
EndSelect
28.Static用来说明该数组为静态数组。
v
29.n=InputBox（"输入数组的上界"）x
Dima（1Ton）AsInteger
30.传值，将实参的值传给形参后，形参的变化会对实参产生影响。
x
四分析程序,正确表示运行结果。
1.PrivateSubCommand1_Click（）
j=0
Fori=1To20Step2
i=i+3
j=j+1
Print"第";j;"次循环i=";i
Nexti
Print"退出循环后i=";i
EndSub
2.Fori=0To4
Forj=0Toi
sc（i,j）=i*5+j
Printsc（i,j）;"";
Nextj
Print
NextI
3.
PrivateSubForm_Click（）
Fori=1To5
PrintTab（i）;String（6-I,"▼"）;Spc（6）;String（I,"▲"）
Nexti
EndSub
五已知程序，画出流程图
1.用辗转相减法求两自然数m，n的最大公约数。
DoWhilem<>n
Ifm>nThen
m=m–n
Else
n=n–m
EndIf
Loop
2.
PrivateSubCommand1_Click（）
x=13
n=0
DoWhilex<26
x=x*1.008
n=n+1
Loop
Printn,x
EndSub
3.
Ifxx=y:
y=t
Ifyt=y:
y=z:
z=t
Ifxt=x:
x=y:
y=t
EndIf
EndIf
六．编程
1.求250以内的素数。
2.在窗体Form1上画一个图片框，名称为P1，高为1900，宽为2400。
请编写适当的事件过程，使得在运行时，如果单击窗体，则装入D盘下的文件名为Pic1.bmp的图片，如果双击窗体，则图片框中的图片消失。
3.随机产生15个100～300之间的整数，求最大值。
4.窗体装入时，在窗体的标题栏显示“装入窗体”，并在窗体装入一幅图片作为背景；当用户单击窗体时，在标题栏上显示“单击”，在窗体显示“欢迎使用VB”；当用户双击窗体，在标题栏显示“鼠标双击”，去除窗体的背景图案，并显示“结束使用VB”。
5.求自然对数e的近似值,要求其误差小于0.000001.
6.编写程序，交换两个图像框中的图形。
在窗体上建立三个图像框，一个命令按钮。
然后进
行属性设置。
第页（共页）
第页（共页）
第页（共页）
第页（共页）
第页（共页）
升级会员 