【VB开源代码栏目提醒】:网学会员在VB开源代码频道为大家收集整理了“2008《VB语言程序设计》测验试题[1] - 其他考试资料“提供大家参考,希望对大家有所帮助!
共有四套测验试题,请任选一套完成,其余自己练习。
2008 级河海大学函授本科 Visual Basic 测验试题一 一、填空题(35 分) 1、在
VB 中,最主要的两种对象是____________和____________ 。
2、对象的属性、方法使用有所不同,form1.cls 是____________的使用。
3、 启动应用程序时, 装载和显示窗体,触发____________和____________事件。
4、将一条语句分成多行显示用____________分隔;将多条语句写在一行,语句间用____________分隔。
5、声明变量为模块级,则应在模块的声明段中用____________或____________来 定 义 。
写 出 前 者 的 作 用 范 围 ____________ 、 写 出 后 者 的 作 用 范 围____________。
6、语句 DIM TEMP AS Object 的作用____________。
Variant 类型可以包含 empty、null、 error empty 指____________、 null 指____________、 error 指____________。
7、在
代码模块中加入 Option Explict 的目的是____________。
8、select case index 加入一条语句,使得 index 不为 1,2 时, case 1:form1.caption1 aption 为 other,则该语句应为 case 2:form1.caption2 ____________ end select 9、i1: do while iai then exchangetrue tempaI:aiaI-1:aI-1temp end ifnext I msgbox msg end sub四、 问答题(20)1、 写出利用滚动条改变窗体底色的例子的程序设计思路。
(同时写出需设置的滚动条属 性及各个用到的事件和各个事件的功能) 滚动条 1--红;2--绿;3--兰 4、详细写出设计仅包含 data 控件,dbgrid 控件,数据绑定控件及查找按钮的应用程序时需设置的具体属性和实现查找功能的命令语句(要求能实现添加、 删除功能)。
2008 级河海大学函授本科 Visual Basic 测验试题三一、 填空:(50)1、
vb 采用解释执行,其编译后生成伪
代码而非本机
代码,本机
代码是
vb5.0 的最大的一项改进,试问本机
代码究竟有何优点____________ 。
2、在应用程序内部,对象的名称有什么作用____________ ,对象的 caption有什么作用____________ 。
3 、 语 句 form1.name : 主 菜 单 , 正 确 否 ____________ 语 句 组form1.captionaaform1.cls 正确否____________ 。
在 4、
vb 中用户自定义类型必须由特定命令创建, 且必须置于模块的声明部分,请定义一学生类型 student,内含姓名 name(8 个字符长度) ,年龄 age(整型) ___________ ____________ age as integer ____________ 5、redim perserve kkuboundkk1 ubound引用上界,其中 preserve 命令的作用____________ 。
6、在 visual basic 中的子过程或函数内部,如何用
代码实现直接返回(即退出)____________ 、____________ 。
7、生成消息框的命令____________ ,生成输入框的命令____________ 。
8、利用对象的属性 setfocus 可获得焦点,对于一个对象只有其 visible 属性和____________ 属性为 true,才能接受焦点。
9、通用对话框(commondialog)属 activex 控件,它可以显示多个标准对话框,包括打开/另存为、字体、打印等对话框,若要显示所有文件,则应设置其属性filter____________ , 若 要 使 它 显 示 为 打 印 对 话 框 , 则 应 使 用 什 么 方 法____________ 。
10、现在要检测用户按键情况,填空: private sub form1_mousemovebutton asintegershift as integerx as singley as single if button and 1 then print 您按下了____________ 键 if button 3 then print 您按下了____________ 键 end sub 11、使用 ____________方法可在图片框中进行文本的输出,用____________方法可画点,用____________ 方法可画直线。
12、用____________ 函数可加载图形,picture 控件的属性 autosize 和 image控 件 的 stretch 属 性 的 作 用 都 是 。
13 、 属 性 过 程 property get 的 作 用____________ 。
14、为了创建____________ 属性,只需在类模块省略属性赋值过程(即仅定义 property get 过程 。
) (10)修改现有语句,并说明错误原因 (题中参数省略二、 改错题:1、 sub form1_click具体参数 dim temp as object tempform1 end sub2、 将动态数组声明为含 93 的二维数组,并进行部分赋值。
Dim str , as string Redim str9,3 For I1 to 9 StrI,1I Next (写出执行结果)三、 执行题: (20)1、sub test byval I as integer 写出窗体单击后打印出的内容(注意格式) II1 Print I End subSub form1_click Dim I I12 Print I Test I Print I End sub 2、scale -55-5-5 line-43.5-4-3.5 line-40-40 line0-3.5-03.5 要求:在下图画出执行结果,并注明-5,5,-4,4,3.5,-3.50四、 问答题(30) 1、 在 windows 的应用程序中,工具栏使用非常普遍,请详细写出创建工具栏的步骤。
2、写出可实现数据定位的各种方法,并写出具体命令。
3、 根据自己的上机实践,谈谈
vb 较之 c 语言有何优点(结合
vb 的特点) 2008 级河海大学函授本科 Visual Basic 测验试题四 一、 填空: (50) 1、要强制显式声明变量,采用何语句____________ 。
2、
vb 是一种基于事件驱动的
程序设计,通常情况下,我们使用对象预定义的事件集,例:sub form1_keypress 该事件在什么情况下被触发____________ 。
3、 现有一
软件, 包括窗口 loginfrmmain现用变量 k1k2 保存 login 窗口的用户名及口令,frmmain 中需根据用户名分配权限,同时在 login 的多个事件中用到k2frmmain 中 不 允 许 调 用 k2 应 分 别 如 何 定 义 变 量k1____________k2____________ 。
4、如下定义一含 10 个元素的一维数组 kk并且对每一元素赋初值为 I, 请填空: ____________ dim I as integer for I0 to 9 ____________ ____________ 5 、 现 有 自 定 义 函 数 beeps 写 出 调 用 该 函 数 的 两 种 方 法 ( 参 数 为 5 )____________ 、____________ 。
6、
vb 使用工程来管理应用程序的所有不同文件(.vbp)在一应用程序可有____________ 个工程文件,模块用来存储
vb 代码,包括窗体
代码、标准模块、类模块,其中____________ 存放与特定窗体/控件无关的
代码。
7、form1.show vbmodalvbmodal 的作用____________ 。
form1 上存在 command1有程序 sub form_load command1.captionhello end sub 该 程 序 执 行 后 将 提 示 错 误 , 写 出 错 误 原 因 : ____________ , 如 何 解 决____________ 。
8、控件的 tabindex 属性决定它在 tab 键顺序中的位置,若想实现按 tab 键时,跳过某一控件,则需设____________ 属性为 0,设某一按钮为默认命令按钮,可设 default 属性为 true则按____________ 键也可选中该按钮。
9、弹出式菜单的设计方法同一般菜单,显示时使用 ____________方法。
10、mousedown 事件中 shift 参数用来检测 shiftctrlalt 按键情况,若 shift4,则按键情况为 ____________,若 shift6 则____________ 。
11 、 line500500-step5050 BF 画 出 什 么 图 形 ? ____________ ,circle2400100080 1/3 画出什么图形?____________ 。
12、播放无声动画用____________ 控件,有声动画用____________ 控件。
(animation/multimedia) 13 、向类中添加事件时用____________ 关键字来声明,用____________ 来引发该事件。
14、写出面向对象系统的特点:____________ 、____________ 、继承性、多态性。
二、 改错题:修改现有语句,并写出错误原因(10) 题中参数省略1、 常量/变量定义: const r13.141592653:const a3/22/93 static aa as integer sub form1_click具体参数 aaaa1 end sub 2、 private sub cmdplay_click具体参数 dlgopen.filteravi 文件.avi.avi dlgopen.showopen anmavi.commandopen anmavi.play anmavi.close end sub (写出执行结果)三、 执行题: (20)1、 sub form1_load form1.keypreviewtrue end sub sub form1_keydownkeycode as integer………. if keycode vbkeyA then command1.setfocus if keycodevbcodeP then command2.setfocus end sub a、写出该段程序的结果及设置 keypreview 属性的作用。
b、写出当 keypreviewfalse 时程序的执行结果。
2、 sub form1_click dim char filenametextdata filenameinputbox输入文件名: if lenfilename then open filename for input as 1 do while not eof1 char input11 if charchr10 then textdatatextdatachar else msgbox textdata textdata endif loop close 1 end if end sub四、 问答题(20)1、写出所有的事件及各事件中具体内容(要求写出各具体命令,例:建立目录:mkdir)其中任何改变与操作
系统相联系。
2、设窗体中有 image1:蝴蝶展开翅膀图image2: 蝴蝶合上翅膀图,image3timer1:定时器, timer1 每秒触发一次,改变 image3 的图象,并使它每次位置 x10, y10当 x 超出屏幕宽度时,将位置中的 x 改为 0。
要求详细写出 timer1_timer 中的程序设计思想。