【VB开源代码栏目提醒】：网学会员为需要VB开源代码的朋友们搜集整理了江苏省计算机二级考试VB程序设计复习题(分类汇总) - 其它资料相关资料，希望对各位网友有所帮助!

《VB 程序设计》综合复习资料 （一、填空题： 第一章 Visual Basic 程序设计概述） 1、Visual Basic 是一种面向_对象_的可视化程序设计语言，采取了__事件驱动__的编程机制。

     2、在 VB 中工程文件的扩展名是_ Vbp ，窗体文件的扩展名是 frm _，标准模块文件的扩展名是_ bas _。

     3、执行“工程”菜单下的部件命令，可选择并添加 ActiveX 控件。

     4、Visual Basic 6.0 用于开发_ WINDOWS 环境下的应用程序。

    第二章 简单的 VB 程序设计 1、 设置是否可以用 Tab 键来选取命令按钮， 应该用_ Tabstop ___属性。

    2、一个控件在窗体的位置由__ Left ___和_ top ___属性决定，其大小由__ height _和_width _属性决定。

    3、利用对象的属性 setfocus 可获得焦点， 对于一个对象， 只有其 visible 属性和_ enabled __属性为 true，才能接受焦点。

    4、设置控件背景颜色的属性名称是_ backcolor __。

    5、所有控件都具有的共同属性是__ name __属性。

    6、一般情况下， 控件有两个属性项的缺省值是相同的， 这两个属性项是_ name 和 caption。

    7、VB 中的每个对象（控件）都有一组特征，这组特征称为_属性_，我们通过修改它可以控制对象的外观和操作。

    8、通常情况下，VB 中一个工程主要包括如下四个文件：窗体文件、工程文件、类模块文件和_标准模块文件_文件，后者的扩展名为.Bas，通常由 Basic 语言编写，是一个可共用的子程序。

    9、VB 有三种工作模式，分别是设计（Design）模式、_运行模式__和中断（Break）模式。

    第三章 1、一般可以使用____ Const ______关键字声明常量。

     2、_ Variant _类型也称变体类型，是一种通用的、可变的数据类型，它可表示或存储任何一种数据类型。

     3、变量的声明分为两种方法：_隐式声明__和__显示声明__。

     、 4、在 VB 中，用_ option base _语句设定数组的下界，用 ubound _和_lbound 语句分别返回数组的上、下界。

     5、在代码模块中加入 Option Explicit 的目的是_强制变量声明。

     6、function aa a1 as dateoptional a2 as boolean as single，写出 optional 命令的作用表示 a2 是一个可选参数__。

     7、在 VB 中，我们用一个简单的_ End__语句就能实现退出程序。

     8、生成消息框的命令是_Msgbox_，生成输入框的命令是 Inputbox __。

     9、通用对话框（commondialog）属 activex 控件，它可以显示多个标准对话框，包括打开/另存为、字体、打印等对话框，若要显示所有文件，则应设置其属性 filter_. __，若要使它显示为打印对话框，则应使用什么方法_、showprint __。

     10、从字符串中任意位置截取字符的函数是_ Mid__。

     11、语句 For j 3 To 20 Step 3 使循环体执行了___6___次。

     12、对于正在使用的动态数组 Arraya，要增加一个单元，但不能破坏数组内的数据，则应使用语句__ redim preserve arrayauboundarraya1__。

     13、在 Visual Basic 中声明静态变量的关键字是___ static___。

     14、表达式 10 Mod 6 4 的值为___0___。

     15、表达式 chrAscquotaquot 5的值为___f______。

     16、VB 中使用注释有 2 种方法，即__ rem_和__’______。

     17、VB 中的数据以四种形式存储：常量、_变量、数组和记录。

     18、为了在 VB 中存储一个 4 行 5 列的二维矩阵，需要定义一个整型的数组，请把数组定义语句补充完整：Dim Juzhen_1 to 41 to 5_ as Integer。

     19、控件数组由一组相同类型的控件组成，这些控件共用一个相同的控件名，但是每个控件都有一个唯一的下标来区分，我们使用属性_ Index __来设置下标。

     20、在过程调用中，实现调用过程的实参和被调用过程的形参之间的数据传递有两种方式：按值传递和_按地址__。

     21、为了保证程序中必须对变量的强制性定义， 需要在代码模块的声明部分加入_ OptionExplicit __语句。

     22、分析 For……Next 循环结构的实例：For i 5 To 30 Step 2 中，循环体一共执行了_13_____次。

     23、表达式 MidquotUniversityOfPetroleumquot 8 4 的值为_ ityo__。

     24、常量分为普通常量和_符号_常量。

     25、要将大写字母转换为小写字母，可使用_ LCase__函数。

     26、不管焦点在哪个控件上，按___ ESC__键相当于按了取消按钮。

     27、执行“工程”菜单下的_部件__命令，可选择并添加 ActiveX 控件。

     28、断点_是程序中 VB 停止执行的地方。

     29、逻辑常量为 True 或__ False ___。

    30、使用了_ Option Explicit __的声明后，当程序中使用未经声明的变量时，程序运行时会报错。

    31、要将小写字母转换为大写字母，可使用 UCase__函数。

     32、自字符串 N1 位开始向右取 N2 个字符，要使用_ Mid__函数。

     33、日期常量表示时，用符号______将日期型数据括起来。

     34、局部变量只能在_过程_中声明和使用。

     35、模块级变量的声明关键字是 Dim 或__ private ___。

     36、函数 Absx的功能是_求 x 的绝对值____。

     37、表达式 3/65 的值是_2.5___。

     第四章 1、向列表框控件添加新项目的方法是__ AddItem __。

     2、在 VB 中，最主要的两种对象是_窗体___和__控件___。

     3、当窗体启动时可通过 StartUpPostion _ _属性控制窗体位于所有者的中心位置。

     4、若要将窗体 Form1 隐藏起来，则可通过执行代码__ form1.hide __来实现。

     5、要使装入到列表框中的数据项能自动按字母顺序排序，应设置该控件的___ sorted__ ____属性为___ ture ___。

     6、窗体上放置了若干个文本框和命令按钮，当窗体装入后，要将焦点自动定位到文本框 Text1 上，则在设计时需要将__ text1__控件的_ tabindex __属性设置为__0____。

     7、在标签控件中通过编程使文字换行用的代码是__ chr10__ _。

     8、设置计时器控件只能触发___ timer ____事件。

     9、设置计时器对象触发事件的时间间隔用__ interval ___属性。

     10、滚动条控件主要支持两个事件，它们是__scroll 和 change__事件。

     11、 要使鼠标停留在按钮上显示特殊的鼠标形状， 应设置的属性值是_ mousepointer _。

     12、设某列表框共有 10 项，按题目要求补齐程序，完成相应的功能。

     （1）按下命令按钮 Command1 时将列表框第 8 项的内容显示在窗体上： Private Sub Command1_Click List.__ selected __7True Print List1._ text _ End Sub （2）单击列表框某一项时立即将该项打印在窗体上： Private Sub List1_Click Print___ list1.text ___ End Sub （3）按下命令按钮 Command1 时在窗体上删除第 1、3、5、7、9 项： Private Sub Command1_Click For I1 To 5 List1.__ removeitem 2i-1__________ Next I End Sub （4）在列表框的每一项之后插入一个新的项： Private Sub Command1_Click For I1 to 10 XInputBox“请输入插入的第” amp I amp “项内容” List1.AddItem__ x2i-1__________ Next I End Sub 13、设在界面上放置了一个滚动条 Hscroll1 和一个标签控件 Label1，要使每次单击滚动条两端箭头时，或单击滚动条滑块与两端箭头之间的空白区域时，标签内容能够反映滚动条的值，补齐以下代码。

     Private Sub Hscroll1.___ change ____ Label1.Caption Hscroll1.___ value __ End Sub 要使拖动滚动条滑块时标签内容能够反映滚动条的值，补齐以下代码。

     Private Sub Hscroll1.__ scrol ___ Label1.Caption Hscroll1.__ value ____ End Sub 14、列表框（ListBox）用于列出可供选择的项目的列表，用户可以选择一个或多个项目。

    它具有几个非常重要的数组属性，其中__ List__属性存放了列表框中所有项目的值。

     15、菜单项一般由标题、访问键、快捷键和复选标志等构成，通过对相应的属性进行设置可以改变这些项目的状态，其中与复选标志相对应的属性是__ Checked _。

     16、keydown 与 keypress 事件各有其参数，若需获得用户按下 quotaquot 还是 quotAquot 需用__keypress ___事件。

     17、控件组合框组合了文本框和列表框的功能，是 VB 中一种功能非常强大的选择类控件。

     18、若需要将窗体 Form2 以模态窗口的形式显示出来，可通过执行代码_ Form2.Show1__来实现。

     19、菜单中的分隔条是一种菜单控件，不响应__ Click（或鼠标单击）_事件，不能被选中。

    第五章 1、 文件按存取方式及其组成结构可分为_顺序__文件、 随机__文件和、二进制____文件。

     2、为了使文件列表框 List1 和目录列表框 Dir1 之间能产生同步效果，必须在_ dir1 的chang __事件过程中加入语句_ list1.pathdir1.path __。

     3、文件系统控件的作用是向用户显示系统中的文件，方便用户选择，它是一组控件的组合，包括：驱动器列表框、__目录列表框 __和文件列表框。

    第六章 图形操作 1、使用__ print __方法可在窗体中进行文本的输出，用_ circle __方法可画圆，用_ line ___方法可画直线。

    2、用___ loadpicture ___函数可加载图形。

    3、为了使一个 Picture 控件能自动根据装入的图片调整大小，应设置该控件的_ autosize___属性为 True。

    第七章 面向对象的编程 1、类是具有相同性质的对象的__集合_______。

     2、语句 DIM TEMP AS Object 的作用是____定义了一个对象类型的变量 TEMP _。

    二、选择题 1、下面不是 VB 工作模式的是（C ） A．设计模式 B．运行模式 C．汇编模式 D．中断模式 2、可视化编程的最大优点是（ C） A．具有标准工具箱 B．一个工程文件由若干个窗体文件组成 C．不需要编写大量代码来描述图形对象 D．所见即所得 3、下列不能打开属性窗口的操作是（C ） A．执行“视图”菜单中的“属性窗口”命令 B．按 F4 键 C．按 CtrlT D．单击工具栏上的“属性窗口”按钮 4、下列可以打开立即窗口的操作是（D ） A．CtrlD B．CtrlE C．CtrlF D．CtrlG 5、Visual Basic 的编程机制是（ D）A．可视化 B．面向对象 C．面向图形 D．事件驱动1、以下能够触发文本框 Change 事件的操作是（D） A．文本框失去焦点 B．文本框获得焦点 C．设置文本框的焦点 D．改变文本框的内容 2、应用程序设计完成后，应将程序保存，保存的过程是（D） A．只保存窗体文件即可 B．只保存工程文件即可 C．先保存工程文件，之后保存窗体文件 D．先保存窗体文件（或标准模块文件），之后还要保存工程文件 3、VB 应用程序的运行模式是（C） A．解释运行模式 B．编译运行模式 C．两者都有 D．汇编模式 4、任何控件都具有的属性是（C） A．TEXT B．CAPTION C．NAME D．FORECOLOR 5、决定控件上文字的字体、字形、大小及效果的属性是（ D） A．TEXT B．CAPTION C．NAME D．FONT 6、在窗体上建立了多个控件，如 TEXT、LABEL1、COMMAND1，若要使程序一运行焦点就定位在 COMMAND1 控件上，应将 COMMAND1 控件的（B ）设置为 0 A．INDEX B．TABINDEX C．TABSTOP D．ENABLED 7、运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的 TEXT 属性进行赋值从而改变了文本框的 TEXT 属性值时，将触发文本框的（D ）事件 A．CLICK B．DBLCLICK C．GOTFOCUS D．CHANGE 8、在运行时，按 TAB 键跳过了一个可以获得焦点的控件（如文本框），则可能是因为（D ） A．该控件的 TABSTOP 属性值为 TRUE B ． 该 控 件 的 TABINDEX 属 性 值 为FALSE C．该控件的 ENABLED 属性值为 TRUE D ． 该 控 件 的 ENABLED 属 性 值 为FALSE 9、为了防止用户随意将光标置于控件上，应（D ） A．将控件的 TABINDEX 属性设置为 0 B．将控件的 TABSTOP 属性设置为 TRUE C．将控件的 TABSTOP 属性设置为 FALSE D．将控件的 ENABLED 属性设置为 FALSE 10、若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（D ）属性 A．BACKCOLOR B．BORDERSTYLE C．FORECOLOR D．BACKSTYLE ，运行时，在文本 11、如果要在文本框中输入字符时，只显示某个字符，如星号（）框中输入的字符仍然显示出来，而不显示星号，原因可能是（B ） A．文本框的 MULTILINE 属性值为 TRUE B．文本框的 LOCKED 属性值为 TRUE C．文本框的 MULTILINE 属性值为 FALSE D．文本框的 LOCKED 属性为 FALSE 12、在运行阶段，要在文本框 TEXT1 获得焦点时选中文本框中所有内容，对应的事件过程是（A ） A．Private Sub Text1_GotFocus Text1.SelStart0 Text1.SellengthLenText1.Text End Sub B．Private Sub Text1_LostFocus Text1.SelStart0 Text1.SellengthLenText1.Text End Sub C．Private Sub Text1_Change Text1.SelStart0 Text1.SellengthLenText1.Text End Sub D．Private Sub Text1_SetFocus Text1.SelStart0 Text1.SellengthLenText1.Text End Sub 13、Visual Basic 继承了 Basic 语言简单易用的语法特点，同时支持面向对象的编程机制，其中构成其控件（对象）的三要素是（D ） A．属性、事件、事件过程 B．控件、窗体、事件 C．属性、过程、方法 D．属性、事件、方法 14、决定标签（Label）显示的属性是（C ） A．Text B．Name C．Caption D．Alignment 15、命令按钮的标题文字由（B ）属性来设置。

     A．Text B．Caption C．Name D．名称 16、若要设置文本的显示颜色，则可用（B ）属性来实现。

     A．BackColor B．Forecolor C．FillColor D．Backstyle 17、在运行时，若要调用某命令钮的 Click 事件过程，则可设置该命令钮对象的（B ）属性为 Ture 来实现。

     A．Enabled B．Value C．Default D．Cancel 18、在运行时，若要获得用户在文本框中所选择的文本，可通过访问（D ）属性来实现。

    A．SelStart B．SelLenght C．Text D．SelText第三章 VB 基本语言 1、以下哪个是合法的变量（D ） A．right B．abc123 C．123_abc D．ab123c 2、下列说法错误的是（ B ） A．在同一模块不同过程中的变量可以同名 B．不同模块中定义的全局变量不可以同名 C．引用另一模块中的全局变量时，必须在变量名前加模块名 D．同一模块中不同级的变量可以同名 3、把 MsgBox 的返回值转换为数值应该使用的函数是（D ） A．Log B．Str C．Len D．Val 4、语句 DIM AA345中定义的数组有（ C ）个元素 A．12 B．60 C．120 D．345 5、下面程序运行后输出的结果是（ B ） AquotCHINAquot BSTRING3A PRINT B END A．CHI B．CCC C．INA D．AAA 6、以下语句的输出结果是（ C ） Print Format32548.5 quot000000.00quot A．32548.5 B．325485.00 C．03254850 D．3254850 7、以下叙述中错误的是（D ） A．如果过程被定义为 Static 类型，则该过程中的局部变量都是 Static 类型 B．Sub 过程中不能嵌套定义 Sub 过程 C．Sub 过程中可以嵌套调用 Sub 过程 D．事件过程可以像通用过程一样由用户定义过程名 8、Visual Basic 提供的 On Error Resume next 错误陷阱语句表示（ C ） A．当发生错误时，使程序转跳到语句标号为 0 的程序块 B．当发生错误时，不使用错误处理程序块 C．当发生错误时，忽略错误行，继续执行下一语句 D．当发生错误时，终止本过程执行，继续执行下一过程 9、在 Visual Basic 中，若要将控制权交给操作系统则通过（D）的语句。

     A．End B．Exit Do C．Exit Sub D．DoEvents 10、在 Visual Basic 中语句的续行号采用（ A ） A．空格与下划线 B．下划线与空格 C．空格与短线 D．短线与空格 11、假定有以下程序段： For i1 to 3 For j5 to 1 Step –1 Print ij Next ji 则语句 Print ij 的执行次数是（ A ） A．15 B．.16 C．17 D．18 12、从键盘上输入两个字符串，分别保存在变量 str1、str2 中。

    确定第二个字符串在第一个字符串中起始位置的函数是（ D） A．Left B．Mid C．String D．Instr 13、如果将布尔常量值 TRUE 赋值给一个整型变量，则整型变量的值为（B ） A．0 B．-1 C．TRUE D．FALSE 14、下列叙述不正确的是（B ） A．注释语句是非执行语句，仅对程序的内容起注释作用，它不被解释和编译 B．注释语句可以放在代码中的任何位置 C．注释语句不能放在续行符的后面 D．代码中加入注释语句的目的是提高程序的可读性 15、语句 PRINT “INT-13.2”；INT-13.2的输出结果为（D ） A．INT-13.2 -13.2 B．INT-13.2 13.2 C．INT-13.2 -13 D．INT-13.2 -14 16、如果 TAB 函数的参数小于 1，则打印位置在第（B ）列 A．0 B．1 C．2 D．3 17、变量未赋值时，数值型变量的值为（A ） A、0 B．空 C．1 D．无任何值 18、下列语句中正确的是（D ） A．txt1.texttxt2.texttxt3.text B．command1.namecmdok C．12label.caption1234 D．ainputbox“hello” 19、假设变量 BOOLVAR 是一个布尔型变量，则下面正确的赋值语句是（D ） A．BOOLVAR‘TRUE’ B．BOOLVAR.TRUE C．BOOLVARTRUE D．BOOLVAR3lt4 20、以下（ ）程序段可以实施 X、Y 变量值的变换（C ） A．YX：XY B．ZX：YZ：XY C．ZX：XY：YZ D．ZX：WY：YZ：XY 21、语句 PRINT “SGN-26”；SGN-26的输出结果为（D ） A．SGN-2626 B．SGN-26 -26 C．SGN-26 1 D．SGN-26 -1 22、读下面程序段，判断变量 Str2 的取值是（B ） Dim Str1 Str2 as String Str1quotUniversityquot Str2STRING3Str1 A．Uni B．UUU C．ity D．yyy 23、VB 支持自定义数据类型，在某程序中我们定义了如下类型： 　Type Student 　　number As string 　　name As String 　　age As Integer 　End Type 针对上述定义，如下几项用法正确的是（ B） A．Student.namequot张三quot B．Dim s As Student s.name＝quot张红quot C．Dim s As Type Student D．Dim s As Type s.namequot张三quot s.namequot张三quot 24、一个工程中包含两个名称分别为 Form1、Form2 的窗体，一个名称为 mdlFunc 的标准模块。

    假定在 Form1、Form2 和 mdlFunc 中分别建立了自定义过程，其定义格式为： Form1 中定义的过程： 　Private Sub frmfunction1 　End Sub 　Form2 中定义的过程： 　Public Sub frmfunction2 　End Sub 　mdlFunc 中定义的过程： 　Public Sub mdlFunction 　End Sub 在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是（B ） A．上述三个过程都可以在工程中的任何窗体或模块中直接被调用 B．只有 mdlFunction 过程能够被工程中各个窗体或模块直接被调用 C．frmfunction1 只能在 form1 中调用，而 frmfunction2 则可以在所有模块或窗体中被直接调用 D．上述三个过程都只能在各自被定义的模块中直接调用 25、VB 中 Do……Loop 结构既可以构成当型循环，也可以构成直到型循环，根据下面的代码： Dim in as Integer n 20 i1 Do Print i ii2 Loop Until i gt20 判断循环结构的类型和循环体的执行次数，正确的选项是（B ） A．当型循环，20 次 B．直到型循环，10 .