vb题库.doc

1、填空题1.图像框的 strtch 属性设置为（true ）时，图形将适应图像框的大小。属性设置为（ false） ，图形框将适应图像的大小。2.文本框的 locked 属性用来决定文本内容能否被编辑，当其值为（false ）时，可以编辑，当其值为（true） ，不可被编辑。3.所有控件都具有的共同属性（name）4.一个控件在窗体上的位置由 top 和（left）属性决定，其大小由 width 和（height）属性决定。5.计时器控件的 interval 属性值是指时间间隔，单位是毫秒，当每隔此时间间隔定时器会触发一次（timer）事件。注意计时器只有 timer 事件6.把“visual

2、basic 程序设计”添加到列表 listbooks 的语句为（listbooks.additem ”visual basic程序设计”）7.函数 instr（“VB 程序设计教程 ”， “程序” ）的值为（3）8.设置计时器对象触发时间的时间间隔用（interval）属性9.表达式（-3）mod 8 的值为（-3) ,3mod (-8) 的值为（3）10.表达式 93/7 mod 8 的值为（5）11.声明定长个数为 10 个字符变量 str 的语句（Dim str As String * 10）12.当进入 VB 集成环境后，发现没有显示“工具箱”窗口，应选择（视图）菜单的“工具箱”选项，

3、使”工具箱 窗口显示13.表示 x 是 5 的倍数或是 9 的倍数的逻辑表达式为（x mod 5 =0 or x mod 9 =0）14.在 VB 中，1234,1.2346E+5 常数分别表示类型(integer),(single)15.把整数 1 赋给一个逻辑型变量，则逻辑变量的值为（false ）16.表达式 1 and 0 的值是（false）17.在调试过程中，参数的传递按两种方式，其中（地址）传递方式是默认的。18.可以同时删除字符串前导和尾部空白的函数是（trim）19.VB 注释语句中采用（）字符开头，续行符采用（ _） ，若上一行写多句语句，则各语句间用（:）字符分开20.已

4、知 a=3.5,b=5.0,c=2.5,d=true,则表达式：a=0 and a+cb+3 or not d 的值是（false ）21.如果：i=11:j=3:i=int(-8.6)+ij+133 mod 5,则 i 的值是（-2）22.如果在模块声明段中有 option base 1 语句，则在该模块中使用 dim a(3 to 5,6)声明数组有（18）个元素23.在通用部分添加 option basic 0 的语句，在定义十个元素的整型静态数组 a 时可以定义为（dim a(9) as integer）24.循环语句 for k=1 to 10 step -1 控制的循环次数为（0）

5、25.在一条 dim 语句中可以声明多个变量，如 dim strvar,invar,sngvar as integer,则 str int sng 的数据类型分别是 variant variant 和（integer）26.按照数据文件的储存方法不同，文件可以分为三种不同的类型，顺序文件， （随机文件） ，和二进制文件27.把整型数 1 赋给一个逻辑变量，则逻辑变量为（true）28.VB 语言编写的应用程序有（解释）和（编译）两种执行方式29.定义过程中要设置可选参数使用的命令是（option1）30.设置控件背景颜色的属性名称（backcolor）前景颜色的属性属性名称（ fonecolo

6、r）31.文本框中所显示的内容是它的（text）属性的值32.欲使自己设计 vb 程序运行过程中不终止本程序的运行，同时又可调用系统中已有的应用程序 C:windowscalc.exe,可在代码窗口必要的地方添加语句（shell(“c:windowscalc.exe”)）33.设置计时器控件只能触发(timer) 事件34.表达式（-3） and 8 的值是（true）35.将焦点定位于命令按钮 command1 之上的语句（command1.setfocus ）36.可以通过（文件）菜单的（退出）命令退出 VB37.滚动条控件有水平滚动条和（垂直）滚动条38.Len（ “实践应用能力 ”）的

7、值是(6)39.声明单精度常量 g（重力加速度）代表 9.8 可写成（const g=9.8）40.在 VB 的程序设计中，可以建立（下拉式）菜单和（弹出式）菜单41.声明单精度常量 P1 代表 3.14159 的语句（const p1=3.14159）42.Option basic 0 模块使用的 dim a (6, 3 to 5)(21)个元素43.,设 x 为一个两位数,将 x 个位数和十位数交换后所得两位数 VB 的表达式是(x mod 10) * 10 + int(x/10).选择1.将 command dialog1 通用对话框以打开对话框打开，可选以下（d）方法A showfon

8、t b showsave c showcolor d showopen2.与传统的程序设计语言相比 VB 最突出的特点是（b）A 程序调试技术 b 事件驱动编制程序机制 c 程序开发环境 d 结构化程序设计3.下面（c）对象在运行时一定不可见A option b text c timer d line4.字体对话框是调用（a）方法来实现的A showfont b showclose c showcolor d showopen5.以下叙述错误的是（d）A 窗体文件包含窗体及其控件的属性B .bas 为扩展名的文件是标准模块文件C 一个工程可以有多个标准文件D 在工程资源管理器窗口中只能包含一个

9、工程文件及属于该工程的其他文件6.clear 方法适用于（ a,b） ，cls 适用于（d,f ）A 组合框 b 列表框 c 复选框 d 窗体 f 图片框7.为了使列表框中的项目按字母顺序排列，应设置（a）属性A sorted b list c text d style8.在 VB 应用程序中，以下叙述正确的描述（a）A 过程的定义不可以嵌套，但过程的调用能嵌套B 过程的定义可以嵌套，但过程的调用不能嵌套 C 过程的定义和过程均不可以嵌套D 过程的定义和过程均可嵌套9.可以唯一识别控件数组的每一个控件属性的是（d）A caption b name c enabled d index10.下面（

10、c）控件不具有 caption 属性A 单选钮 b 标签框 c 文本框 d 命令按钮11.下列叙述正确的是（d）A 对象的属性只能在属性窗口设置B 对象是既包括数据又包括对象数据进行操作的方法的物理实体C 实践过程都要由用户点击对象来触发D 不同的对象能识别不同的事件12.设 a=”visual basic”,下面 b=”basic”的语句是（d）A b=left(a,8,5) b=left(a,8,12) c=right(a,5,5) d=mid(a,8,5)13.下列对象中没有焦点属性的是（b）A 命令按钮控件 b 窗体控件 c 单选框控件 d 文本框控件14.当一个工程有多个窗体时，其中

11、的启动窗体是（C）A 启动 VB 时创建的窗体B 第一个添加的窗体C 在“工程属性”对话框中指定的窗体D 最后一个添加的窗体15.如果要使一个窗体从屏幕上和内存中完全消失，所要用的语句（c）A hide b show c unload d load16.以下不能作为 VB 中的变量名(d)A abx45 b p1234 c xy d 89ta17.假定有一个菜单项，名为 menuitem,为了在运行时使该菜单失效（变灰） ，应使用的语句（a）A menuitem.enabled=false b menuitem.enabled=trueCmenuitem.visible=false d men

12、uitem.visible=true18.下列数据类型中，占有内存最大的是（c）A byte b boolean c single d integer19.在窗体上画一个名称为 command 的命令按钮，然后编写程序Private sub command-click()Static x as integerClsY=y+2X=x+2Print x,yEnd sub程序运行后，连续单击四次 command1 后，窗体上显示（a）A 8 2 b 2 2 c 8 8 d 2 820.以下关于过程及过程参数的描述中，错误的是（C）A 过程的参数可以使控件的名称B 窗体可以作为过程的参数C 按传值方式

13、传递参数，有可能会改变实际参数的值D 用数组作为过程的参数时，使用的是传地址方式21.定义过程中，要设置可选参数使用的命令的是（c）A variant b paramarray c option1 d array22.单击滚动条两端的任一滚动箭头，将触发该滚动条的（c）事件A dragover b keydown c change d scroll23.下列有关控件数组和一般控件的区别的叙述，最合理的是（d）A 控件数组的建立通过 dim 语句声明，而一般控件不必声明B 控件数组的 index 为 0，而一般控件的 index 为空C 控件数组的 index 为 1，而一般控件的 index

14、为 0D 控件数组一定由多个同类型的控件构成，一般控件只有一个控件24.inputbox 函数的返回值的类型为（B）A 日期型 B 字符串型 C 逻辑型 D 数值判断1.VB 中，若同一个工程有许多窗体，可以指定任一窗体为起始窗体（Y）2.清除 list1 列表框的内容的语句为 list1.cls (N)3.在多文档应用中，每次只能有一个活动的子窗体可以进行编辑（Y）4.在框架控件中的几个单选按钮，只能有一个单选按钮的 value 属性为 true(N)5.在 VB 的工具栏中包括了所有的 VB 控件，我们不能再加载其他的控件（N）6.控件是对象，而窗体不是对象，他只是控件对象的窗体（N）7.

15、For next 语句中初值必须大于终值（N ）8.对象的可见性用 enabled 属性设置可用性用 visible 属性设置（N)9.在命令按钮中 click 事件过程中,exit 和 end 等效（N）10.只要用拖拽的方法，将工具箱中所需的控件拖到窗体上即可（N）11.工具箱提供了 VB 所需的所有控件（N）12.一个目标程序所需的所有文件的集合成为工程（Y ）13.单击并拖拽工具箱中所需的控件到窗体上添加完成控件任务（N）14.Image 控件不能作为容器使用（Y）15.Msgbox()函数建立的消息框能显示信息也能输入用户信息（ N）16.timer 是时钟控件的唯一事件（Y）17.

16、当计时器控件的 interval 属性值设置为 0 时，会连续不断地激发 timer 事件（N）18.当 do while loop 或 do until loop 语句中 while 或 until 后的表达式的值为 true 或非 0时，循环继续（N）19.滚动条控件不能作为不可作为用户输入数据的方法（Y）20.事件过程由某个用户事件或系统事件触发后执行，不能被其他过程调用（N）21.移动框架内的控件时框架内的控件也跟随移动，所以框架内的各个控件的 left 和 top 属性值也将分别随之改变（N）22.某一过程的静态变量在过程结束后，静态变量及其值可以在其他过程中使用（N）23.VB 中

17、规定窗体的的文件扩展名为 vbp(N )24.计时器控件的 interval 属性的单位是毫秒，如将此值设置为 10，则每隔 0.01 秒产生一次timer 事件（Y）25.“ ”是一个字符串， “不是字符串（N）26.菜单每一项菜单控件，可以通过点击菜单项或通过光标选择并按回车，以触发click（Y）27.如果在调用过程中使用地址传递参数，则在被调用的过程中不可以改变参数的（N）27.在 vb6.0 中如果要增加工具箱的控件，应执行“文件”菜单中的命令（N）28.在框架控件上放置的控件可以放置到框架控件的外面（N）29.在 vb 中可以将在 picture 控件中绘制的图形以文件的形式保存在

18、磁盘上（Y ）程序填空题目：本程序功能为，单击窗体，Form1 的输出结果为A1=10 B1=20A2=20 B2=10请在【】处填入正确的内容*SPACE*Public Sub Swap1 ( byval x As Integer , ByVal y As Integer)Dim t As Integert = xx = yy = tEnd SubPublic Sub Swap2(x As Integer , y As Integer)Dim t As Integert = xx = yy = tEnd SubPrivate Sub Form_Click()Dim a As Integer

19、, b As Integera = 10b = 20*SPACE*Swap1 a , bForm1.Print “A1=” ; a, “B1=” ; ba = 10b = 20*SPACE*Swap2 a, bForm1.Print “A2=”; a, “B2=” ; bEnd Sub题目：据统计，手印全长与人体身高存在一定的比例关系：身高(厘米)=手印全长*9.75，编写通过人手印长计算身高的函数？Private Function length(flong As Single)*SPACE*length = flong * 9.75End FunctionPrivate Sub Form_C

20、lick()Dim le As Singlele = Val (InputBox（” 请输入人手印全长 ”）)*SPACE*h = length(le)Print “此人的手印全长是：” *FOUND*Loop(next(j)PrintNext iEnd Sub题目：以下程序功能是输入三个数，由大到小排序。Option ExplicitDim A As IntegerDim B As IntegerDim C As IntegerPrivate Sub Form1_Click()Dim nTemp As IntegerA=Val(InputBox(“Please input first int

21、eger”,”输入正整数”)B=Val(InputBox(“Please input second integer”,”输入正整数”)C=Val(InputBox(“Please input third Integer”,”输入正整数 “)*FOUND*If A =0.01Form1.Print “e=” ; eEnd Sub题目：下面的程序段用于删除数组中指定位置的数字，如果位置错误给出提示，否则分别显示删除前后的数组元素Option ExplicitPrivate Sub Form_Click()Dim a(10) As Integer, x Integer ,i As Integer , k As IntegerFor i = 1 To 10 a(i) = Int (Rnd*90)+10Print a (i);Next iPrintx = InputBox (“请输入要删除第几位数字”)If x 0 And x = 10 Then*FOUND*For k = x To 10(9)*FOUND*a(k)=a(k-1)(a(k-1)=a(k) Next kPrint”删除后的数组：”For i =1 To 9Print a(i)Next iElsePrint “删除位置错误”*FOUND*EndEnd Sub