第三章练习题
班级：______________ 学号：______________ 姓名：______________
一、选择题
1、假设某一工程文件的工程资源管理窗口如下图所示，该工程文件的磁盘文件名为（），窗体文件
的磁盘文件名称为（），标准模块文件的磁盘文件名为（）。
（A）工程1.vbp （B）exer21.vbp （C）Form1.frm
（D）exer21.frm (E)Module1.bas (F)exer21.bas
2、新建一个工程，将其窗体的Nanme属性设置为ＭyFirst，则默认的窗体文件名为（）
（Ａ）Form1.frm （B）工程1. frm （C）ＭyFirst.frm （D）Form1. vbp
3、下列窗体属性中，（）属性在程序运行时其设置才起作用。
（Ａ）BorderStyle （B）Caption （C）ＭaxButton （D）Left
4、当将窗体的（）属性值设置为False时，将不显示窗体的控制菜单、最大化、最小化及关闭按钮。
（Ａ）ＭaxButton （B）ＭinButton （C）ControlBox （D）WindowState
5、如果要使窗体的最大化按钮变成暗灰色（不起作用），应设置窗体的（）属性。
（Ａ）Caption （B）Icon （C）ＭaxButton （D）ＭinButton
6、要在窗体上显示图片，需设置窗体的（）属性。
（Ａ）Caption （B）Icon （C）Picture （D）ControlBox
7、要使窗体上的所有控件具有相同的字体格式，可以首先在属性窗口对（）的（）属性进行设
置，然后再添加各控件。
（Ａ）所有控件（B）窗体（C）Font （D）FontName
8、假设某一事件过程如下，则响应该过程的对象名是（），事件名是（）。
Private Sub Mylb1_DbClick()
Form1.Caption =”hello”
End Sub
（Ａ）Mylb1_DbClick （B）Mylb1 （C）DbClick （D）Mylb1_Click
9、在运行时，系统自动执行启动窗体的（）事件过程。
（Ａ）Click （B）GotFocus （C）Load （D）UnLoad
10、如果设计时在属性窗口将命令按钮的（）属性设置为False，则运行时按钮从窗体上消失。
（Ａ）Visible （B）Enabled （C）DisabledPicture （D）Default
11、下列操作不能触发一个命令按钮的Click事件的是（）。
（Ａ）在按钮上单击鼠标左键（B）在按钮上单击鼠标右键
（C）把焦点移至按钮上，然后按回车键（D）使用该按钮的访问键
12、如果将布尔常量值True赋值给一个整型变量，则整型变量的值为（）。
（Ａ）0 （B）-1 （C）True （D）False
13、假设变量boolVar是一个布尔型变量，则下面正确的赋值语句是（）。
（Ａ）boolVar= “Ｔrue”（B）boolVar= .True.
（C）boolVar= #True# （D）boolVar= 3<4
14、将文本框的（）属性设置为True时，文本框可输入或显示多行文本，且会在输入的内容超出文本
框的宽度时自动换行。
（Ａ）MultiLine （B）ScrollBars （C）Text （D）Enabled
15、如果要在文本框中键入字符时，只显示某个字符，如星号（*），应设置文本框的（）属性。
（Ａ）Caption （B）PasswordChar （C）Text （D）Char
16、如果将文本框的（）属性设置为True，则运行时不能对文本框中的内容进行编辑。
（Ａ）Locked （B）MultiLine （C）TabStop （D）Visible
17、如果将文本框的Locked属性设置为True，则以下说法（）是正确的。
（Ａ）此时在属性窗口不可以修改文本框的Text属性值
（B）运行时用户不可以在界面上修改文本框中的内容
（C）在程序代码中不可以修改文本框的内容，如不可以使用语句Text1. Text =＂aaa＂
（D）以上均不正确
18、运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的Text属性进行赋值从而改变了
文本框的Text属性时，将触发文本框的（）事件。
（Ａ）Click （B）DbClick （C）GotFocus （D）Change
19、通过文本框的（）事件过程可以获取文本中键入字符的ASCII码值。
（Ａ）Change （B）GotFocus （C）LosttFocus （D）KeyPress
20、下面（）对象无Caption属性。
（Ａ）Form （B）CommandBotton （C）TextBox （D）Label
21、Print方法可以在（）对象上输出数据。（多选）
（A）窗体（B）桌面（C）标题栏（D）立即窗口
(E) 图片框(F)状态栏（G）打印机（H）代码窗口
22、要在Form_Load事件过程中使用Print方法在窗体上输出一定的内容，应（）。（多选）
（A）设置窗体的Visible属性（B）设置窗体的AutoRedraw属性
（C）调用窗体的Show方法（D）设置窗体的Enabled属性
23、以下（）程序段可以实现X、Y变量值的交换。
（Ａ）Y=X：X=Y （B）Z=X：Y=Z：X=Y
（C）Z=X：X=Y：Y=Z （D）Z=X：W=Y：Y=Z：X=Y
24、若要在标签控件显示时，不覆盖其背景内容，应设置标签控件的（）属性。
（Ａ）BackColor （B）BorderStyle （C）ForeColor （D）BackStyle
25、当标签的标题内容太长，需要根据标题自动调整标签的大小时，应设置标签的（）属性为True。
若需要标签在垂直方向变化大小以与标题相适应，还应设置（）属性为True。
（Ａ）AutoSize （B）WordWrap （C）Enabled （D）Visible
26、任何控件都具有（）属性。
（Ａ）Text （B）Caption （C）Name （D）ForeColor
二、程序填空
1、下面是窗体Form1的Click事件过程，实现运行是每次单击窗体时，窗体均向右移动100缇。
Private Sub ( 1 )()
( 2 ) intleft As Integer
intleft = intleft +100
Form1. （3）= intleft
End Sub
供选择的答案：
（1）（Ａ）Form1_Click （B）Form_Click （C）Command_Click （D）Command1_Click
(2) （Ａ）Dim （B）Static （C）Private （D）Public
(3) （Ａ）Caption （B）Top （C）Width （D）Left
2、下列事件过程实现从键盘输入任意一个实数，用Print方法在窗体上显示其平方和平方根，要求数
据之间有间隔。
Private Sub Form_Click ()
Dim a As Single
a =Abs (Val(InputBox(＂请输入一个实数＂)))
Print a*a; (1) ; ( 2 )
End Sub
供选择的答案：
（1）（Ａ）Spc(4) （B）Tab(4) （C）+ （D）&
(2) （Ａ）a （B）Sqr(a) （C）Abs(a) （D）Exp(a)
3、下面的事件过程随机产生一个三位正整数，然后逆序输出，并将产生的数与逆序数显示在一行上。
例如，产生345，输出345 543。
Private Sub Form_Click ()
Dim a As Integer, s As Sring, b As Integer
Randomize
a = (1)
s = (2)
b = (3)
Print a ;(4) ; b
End Sub
供选择的答案：
（1）（Ａ）Int (Rnd*900+100) （B）Int (Rnd*100) （C）Int (Rnd*900) （D）Int (Rnd*100+900)
(2) （Ａ）Str(a) （B）Trim(Str(a)) （C）Trim((a) （D）Left(a)
(3) （Ａ）Val(Rright(s,2)&Left(s,2)) （B）Val(Rright(s,1)&Mid(s,2,1)&Left(s,1))
（C）Val(Mid(s,1)&Left(s,1)) （D）Val(Left(s,1) &Rright(s,1))
(4) （Ａ）Tab(2) （B）Mid(2) （C）Left(2) （D）Spc(2)
三、编程题
设计一个程序，窗体上有两个文本框和一个“清除”按钮，当在第一个文本框中输入文本内容时，立刻在第二个文本框中显示相同的内容；或在第二个文本框中输入文本内容时，立刻在第一个文本框中显示相同的内容。当单击“清除”按钮时，清除两个文本框中的文本内容。
大学VB考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是（）。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句：a=123& MID("123456",3,2)执行后，a变量中的值是（）。 A、"12334" B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件，这两个文件分别是（B）。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是（C）。 A、https://www.doczj.com/doc/e2221548.html,="VisualBasic窗体" B、Form1.Title="VisualBasic窗体" C、Form1.Caption="VisualBasic窗体" D、Form1.Text="VisualBasic窗体" 5、为了装入一个VisualBasic应用程序，应当（D） A、只装入窗体文件（.frm） B、只装入工程文件（.vbp） C、分别装入工程文件和标准模块文件（.bas） D、分别装入工程文件、窗体文件和标准模块文件 6、赋给一个数组的数据类型一定要（A）。 A、相同 B、不相同 C、两可 D、都不对 7、下面正确的赋值语句是（C）。 A、x+y=30 B、y=π*r*r C、y=x+30 D、3y=x 8、VisualBasic 6.0集成环境的主窗口中不包括（C）。
A、标题栏 B、菜单栏 C、状态栏 D、工具栏 9、以下叙述中错误的是(C)。 A、Visual Basic 是事件驱动型可视化编程工具 B、Visual Basic应用程序不具有明显的开始和结束语句 C、Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性(计时器) D、Visual Basic中控件的某些属性只能在运行时设置 10、要使Print方法在Form_Load事件中起作用，要对窗体的(C)属性进行设置。 A、Backcolor B、ForeColor C、AutoRedraw D、BackStyle 11、若要使命令按钮不可操作，要对(A)属性进行设制。 A、Enabled B、Visible C、BackColor D、Caption 12、以下叙述中错误的是(B)。 A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D、一个工程默认的启动对象是Form1 13、Cls方法可以清除窗体或图片框中的(C)容。 A、在设计阶段使用Picture设置的背景位图 B、在设计阶段放置的控件 C、在运行阶段产生的图形和文字 D、以上均可 14、设x=3,y=5,则以下表达式值为真的是 (C) A、(-3+5>x) And (y>0) B、(x<0) Eqv (y>0) C、(x>y) Or (y>0) D、x>=y And y>10 15、为了防止用户随意将光标置于控件之上，应将进行(D)设置。 A、将控件的TabIndex属性设置为0
1、计算圆柱体的表面积和体积 在窗体上放置5个标签，4个文本框，3个命令按钮，单击“计算”按钮，右侧文本框显示相应的结果；单击“清除”按钮，清除所有文本框的内容；单击“结束”按钮，程序结束。（用两种方法做） 2、计算长方体的体积和表面积 3、求二元一次方程的根 求二元一次方程5X2-9X-10=0，运行界面如图
1．填空题 1．在程序设计语言系统中具有固定语法含义的符号串称为（），它们通常用来表示系统提供的标准过程、函数、运算符、常量等。 2．（）用于标记用户自定义的常量、类型、变量、控件、过程、函数等名字。 3．整型数据占（）字节的内存空间。长整型数据占（）个字节的内存空间。单精度浮点型数据占（）个字节的内存空间。双精度浮点型数据占（）个字节的内存空间。日期型数据占（）个字节的内存空间。 4．100%表示100为（）型数据；100！表示100为（）型数据；100＠表示100为()型数据。 5符号常量在某一过程中说明，则该符号常量只能在（）内有效。 6．若一个整型变量说明了之后没有给它赋值，则它的值为（）。 7．在VB中可以把类型说明符放在变量名的（）来说明变量的类型。 8．为使VB的编译程序自动检查变量声明，遇到未经说明的标识符发出错误警告信息，在程
序中要加上（Option Explicit）语句。 9．对含有多种运算的表达式，各种运算之间的顺序为（）→（）→（）→（）。 10．把的小数部分四舍五入转换为整数，可使用函数（）。 11．将x四舍五入到百位（例如，若x=应舍入成23900），可使用表达式（）。 12．将x从十位截断（例如，x=应截成23800）可使用表达式（）。 13．设X为数值变量，求X的常用对数可使用的表达式是（Log(X)/Log(10)）。 14．要从字符串“VisualBASIC”中截取子字符串“BASIC”可使用函数（） 15．设S是字符串变量，并且串长度为7，写出生成由S的偶数序号字符组成的字符串的表达式（例如，把字符串”ABCDEFG”变成“BDF”）。 16．设S是字符串变量，并且串长度为7，写出用第2i–1个字符代替第2i个字符所得到字符串的表达式（例如，把字符串”ABCDEFG”变成“AACCEEG”）。 17．产生从整数a到整数b之间的随机整数可使用表达式（Int((b-a+1)*Rnd+a)）。
vb 练习题及答案 【篇一：vb 习题(含答案)】 lass=txt>1 、vb 程序中，通常不会产生错误提示的是( )。（1 分） a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。（1 分） a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中，正确的说法是( )。（1 分） a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名 可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能，可以通过按下功能 键( )得到帮助。（ 1 分） a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。（ 1 分） a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。（ 1 分） a、0 b 、1 c、2 d 、5 7、文本框没有( )属性（1 分） a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。（ 1 分） a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中，定义x 为变体型变量的是( )。（1 分） a、dim x as double b 、dim x c、dim x! d 、x%=23
25、设有如下变量声明：dim testdate as date ，为变量testdate 正确赋值的表达方式是( )。（1 分） a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句，a=beijing :b=shanghai :print a,b 对其输出结果的描述中，正确的是( )。（1 分） a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中 间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a ：a=b: b=t 执行后( )。（1 分） a、a 值为3，b 值为3 b 、a 值为3，b 值为5 c、a 值为5，b 值为5 d 、a 值为5，b 值为3 28、下列语句中，正确的是( )。（1 分） a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后， y 结果是( )。（1 分） a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) ， 将显示一个输入对话框，在对话框的输入区中显示的信息是( )。（1 分） a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过 程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮，先后在两个输 入对话框中输入123 和321 ，窗体显示的内容是( )。（1 分） a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后，所产生的消息框的标题是 ( )。（1 分） a、aaa b 、bbb
VB第三章练习 一、选择题 1．关于Visual Basic程序的说法不正确的是________。 A) 一行可以写多条语句，语句之间用“:”隔开 B) 一条语句可以写在多行上，用“空格”加“_”作为续行标志 C) 程序中的大小写字母不区分 D) 变量在使用之前必须先定义类型 2．Visual Basic的一条语句可以写在多行，但要用续行符，续行符应为________。 A) 一个空格加一个下划字符(_) B) 一个下划字符(_) C) 直接回车 D) 一个空格加一个连字符(-) 3．Visual Basic的一行可以写多条语句，语句之间用________隔开。 A) 逗号 B) 分号 C) 顿号_ D) 冒号 4．下列说法不正确的是 ________。 A) 注释语句是非执行语句，仅对程序的有关内容其注释作用，它不被解释和编译 B) 注释语句可以作为代码中的一行 C) 注释语句不可以放在其他语句的后面 D) 代码中加入注释语句的目的是提高程序的可读性 5．下列说法不正确的是________。 A) 调试程序时，使用解释运行方式比较方便 B) 解释运行方式比编译运行方式运行应用程序的速度慢 C) 解释运行方式必须在Visual Basic集成环境下使用 D) 解释运行方式和编译运行方式都必须在Visual Basic集成环境下使用 6．一般情况下，用Visual Basic创建应用程序分为4个主要步骤。以下操作顺序正确的是________。 ① 创建应用程序的界面② 编写程序代码，建立事件过程 ③ 设置对象属性④ 调试运行程序，生成可执行文件 A) ①②③④ B)①③②④ C) ②①④③ D) ②③①④ 7．新建工程的快捷键是________ 。 A) Crtl+A B)Crtl+D C) Crtl+N D) Crtl+E 8．工程文件的扩展名是________。 A) frm B) frx C) cls D)vbp 9．假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为"Visual Basic Test"的语句为________。 A) Form1＝"Visual Basic Test" B) Caption＝"Visual Basic Test" C) Form1.Text＝"Visual Basic Test" D) https://www.doczj.com/doc/e2221548.html,＝"Visual Basic Test" 10. 下列不能打开代码窗口的操作是________ 。 A) 双击窗体上的某个控件 B) 双击窗体 C) 按F7键 D) 单击窗体或控件
VB试卷 一、单项选择题(每题2分,共40分) 1. 窗体的标题栏显示内容由窗体对象的属性决定。 A) BackColor B)BackStyle C)Text D)Caption 2. 窗体的示意图标可用属性来设置。 A) Picture B) Image C) Icon D) MouseIcon 3. 窗体的控制菜单的有无由窗体对象的属性决定。 A) ControlBox B) MinButton C) MaxButton D) BorderStyle 4. 若要取消窗体的最大化功能，则可设置属性为False来实现。 A) ControlBox B) MinButton C) MaxButton D) Enabled 5. 以下4个选项，不属于VB的工作模式。 A) 编译 B) 设计 C) 运行 D) 中断 6. 窗体的边框样式由窗体对象的属性来设置。 A) BackStyle B) BorderStyle C) WindowState D) FillStyle 7. 若要以程序代码方式设置在窗体中显示文本的字体大小，则可用窗体对象的属性来实现。 A) FontName B) Font C) FontSize D) FontBold 8. 命令按钮的标题文字由属性来设置。 A) Text B) Caption C) Name D) (名称) 9. VB是面向对象的程序设计，以下4个选项，不属于面向对象的三要素。 A) 变量 B) 属性 C) 事件 D) 方法 10. 若要将某命令按钮设置为默认命令按钮，可设置属性为True来实现。 A) Value B) Cancel C) Default D) Enabled 11. 若要使命令按钮不可见，可设置属性为False来实现。 A) Value B) Enabled C) Visible D) Cancel 12. 运行程序时，系统自动执行窗体的事件。 A) load B) click C) unload D) GotFocus 13. 若要设置文本框最大可接收的字符数，可通过属性来实现。 A) MultiLine B) Length C) Max D) MaxLength 14. 若要使某命令按钮获得控制焦点，可使用方法来设置。 A) Refresh B) SetFocus C) GotFocus D) Value 15. 若要使命令钮可响应事件，可通过设置属性的取值来实现。 A) Visible B) Enabled C) Default D) Value 16. 在运行时，若要调用某命令按钮的Click事件过程，可设置该命令按钮对象的 属性为True来实现。 A) Enabled B) Value C) Default D) Cancel 17. 标签框的边框，由属性的设置值决定。
第3章程序流程控制 3．1 填空题 1．设变量r 表示圆的半径，则计算圆的面积并赋给变量s使用的赋值语句为（s=3.14159*r*r ）。 2．给命令按钮Command2的Caption属性赋予字符串“退出”使用的赋值语句为（Command2.Caption=＂退出＂）。 3．为了求n的阶乘，要求用户输入n的值。程序使用InputBox函数输入，要求对话框提示信息为“请输入一个求阶乘的数：”，标题为“求数的阶乘”，并且正确地把输入的信息转换为数值存放到变量n中，则使用的赋值语句为（n=val（InputBox（＂请输入一个求阶乘的数：＂，＂求数的阶乘＂））。 ４．如果使用MsgBox对话框显示提示信息“退出本系统？”，并显示“是（Yes）”和“否（No）”两个按钮，显示图标“？”号，指定第一个按钮为默认值以及标题为“提示信息”，则调用MsgBox函数的形式为（MsgBox（＂退出本系统? ＂，4+32+0，＂提示信息＂））。 ５．如果使用MsgBox对话框显示提示信息“文件未找到！”，并显示“确定”按钮、图标“！”号和标题“文件查找”，则使用的MsgBox语句为（MsgBox＂文件未找到＂，0+48+0，＂文件查找＂）。 ６．要在当前窗体Form和立即窗口输出字符串“Visual BASIC 6.0”使用的Print方法分别是( Print “Visual BASIC 6.0”)和( Debug.Print “Visual BASIC 6.0”)。 ７．使用Print方法时，若用逗号分隔，则按( 标准)格式输出各表达式的值，若用分号分隔，则按( 紧凑)格式输出各表达式的值。 ８．注释语句是一个（非执行）语句，VB不对它们进行编译，对程序的执行结果没有任何影响。 ９．判别变量i是否为偶数，若为偶数就把它显示出来。使用单行结构条件语句为（If i Mod 2=0 Then print x ）。 页脚内容1
| 最新VB题库及答案 一、选择题 第1部分 1、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是 A、Private Sub Text1_Change() = "计算机等级考试" End Sub ] B、Private Sub Command1_Click() Caption = "计算机等级考试" End Sub C、Private Sub Form_Click() = "计算机等级考试" End Sub D、Private Sub Command1_Click() = "计算机等级考试" { End Sub 2、在一行内写多条语句时，每个语句之间用（）符号分隔。 A、 , B、： C、. D、； 3、下面（）是合法的变量名。 A、X_YZ B、123ABC C、INTEGER D、X-Y ] 4、下面（）是合法的字符常量。 A、 ABC$ B、“ABC” C、‘ABC’ D、 ABC 5、表达式16/4 - 2^5*8 MOD 5\2的值为（）。 A、14 B、 4 C、20 D、2 6、设a=”MicrosoftVisualBasic”，则以下使变量的b值为”VisualBasic”的语句是 A、b=Left(a,10) B、b=Mid(a,10) — C、b=Right(a,10) D、b=Mid(a,11,10) 7、设a="a"，b="b"，c="c"，d="d"，执行语句x = IIf((a < b) Or (c > d), "A",
习题 一、单项选择题 1、设x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是（） A.PrintA=x+y B. Print"A="；x+y C. Print"A="+Str(x+y) D. Print"A="&x+y 2、假定有如下的命令按钮(名称为Command1)事件过程： PrivateSubCommand1_Click() x=InputBox("输入："，"输入整数") MsgBox"输入的数据是：”，，”输入数据："+x EndSub 程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是（） A. x的值是数值10 B. 输入对话框的标题是“输入整数” C. 信息框的标题是“输入数据：10” D. 信息框中显示的是“输入的数据是：” 3、有如下程序 a=3;b=4 PRINT b＜a END 运行后，输出的结果是( ) A.4＞3 B.-1 C.0 D.显示出错信息 4、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1 的命令按钮，然后编写一个事件过程。程序运行以后，如果在文本框中输入一个字 符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件 过程是（） A. Private Sub Text1_Change() B. Private Sub Command1_Click() Command1.Caption=”计算机等级考试”Caption=”计算机等级考试” End Sub End Sub C. Private Sub Form1_Click() D. Private Sub Command1_Click() Text1.Caption=”计算机等级考试”Text1.Text=”计算机等级考试”
1、在考生文件夹下有工程文件wy7、vbp及窗体文件wy7、frm,该程序就是不完整的,请在有？号的地方填入正确的程序代码,然后删除？及所有注释符号(即 '号),但不能修改其它部分。修改后的程序文件都保存,存盘时不得修改文件夹与文件名。 本题描述如下: 在窗体上有一个名为Text1的文本框,有三个命令按钮,名称分别就是C1、C2与C3,标题分别就是"读入"、"加密"与"存盘"。要求程序运行后,点击"读入"按钮,将文本文件in7、txt(该文件在考生文件夹下)中的文本信息读入文本框Text1中;点击"加密"按钮将Text1中的英文字母加密转换,并将转换后的结果显示到Text1中。转换方式为转换成该字母对应字母表中后两个位置的字母。例如,转换前的字母就是"a",则转换后的就是"c",转换前就是"E",转换后就是"G";点击"存盘"按钮, 则将转换后的文本框中的文本保存到out7、txt 文件中(该文件保存到考生文件夹下)。 Private Sub C1_Click() Dim strinfo As String Open "in7、txt" For Input As 1 Input #1, strinfo Close #1 Text1、Text = strinfo End Sub Private Sub C2_Click() Dim strchange As String Dim i As Integer For i = 1 To Len(Text1、Text) strchange = strchange + Chr(Asc(Mid(Text1、Text, i, 1)) + 2) Next Text1、Text = strchange End Sub Private Sub C3_Click() Open "out7、txt" For Output As 1 Print #1, Text1、Text Close #1 End Sub 2、(1)在考生文件夹下有工程文件wy5、vbp及窗体文件wy5、frm,该程序就是不完整的,请在有？号的地方填入正确内容,然后删除？及所有注释符(即'号),但不能修改其它部分。存盘时不得改变文件名与文件夹。本题描述如下: 在窗口中有一个RichText文本框控件(名称为rtx1)与一个文本框控件(名称为Text1),两个命令按钮,名称 分别为Command1与Command2,标题分别为"加入WY01、TXT"、"统计字符个数"。要求程序运行后,单击command1将考生文件夹下的wy01、txt的内容显示到rtx1中;单击"统计字符个数"按钮统计Text1中有多少个字符,将结果显示在Text1中。
第三章建立简单的Visual Basic应用程序 教学要求： 掌握Visual Basic语言语句的语法规则，掌握赋值语句、注释、暂停与程序结束语句；通过编写简单的应用程序，了解如何用Visual Basic开发一个应用程序，掌握设计应用程序的方法，学会程序的保存、装入及运行。 知识点： 面向对象的交互式程序设计；使用Visual Basic开发应用程序。 内容导航： 一、语句 （一）语句 语句是执行具体操作的指令，每个语句以回车键结束。 （二）赋值语句 用赋值语句可以把指定的值赋给某个变量或某个带有属性的对象，一般格式为：［Let］目标操作符=源操作符 （三）注释、暂停与程序结束语句 1．注释语句 格式：Rem 注释内容 ′注释内容 2．暂停语句（Stop） 格式：Stop 3．结束语句（End） 格式：End 二、编写简单的Visual Basic应用程序 （一）用Visual Basic开发应用程序的一般步骤 在用Visual Basic开发应用程序时，需要以下3步：建立可视用户界面；设置可视界面特性；编写事件驱动代码。 （二）编写Visual Basic应用程序 1．建立用户界面 2．设置属性 3．编写代码 三、程序的保存、装入和运行 （一）保存程序 应用程序可以用4种类型的文件保存。一类是单独的窗体文件，扩展名为.frm；一类是公用的标准模块文件，扩展名为.bas；第三类是类模块文件，扩展名为.cls（本书不涉及类模块文件）；第四类是工程文件，这种文件由若干个窗体和模块组成，扩展名为.vbp。 （二）程序的装入 一个应用程序包括4类文件，即窗体文件、标准模块文件、类模块文件和工程文件，这4类文件都有自己的文件名。但只要装入工程文件，就可以自动把与该工程有关的其他3类文件装入内存。 （三）程序的运行
一、选择题（1-30 题每小题1分，共30分，31-45题每小题2分,共30分，总计60分）要使窗体Form1的标题栏中显示“正在复制文件…”，正确的语句是：a A．Form1.Caption=“正在复制文件…” B．Form1.Title=“正在复制文件…” C．Form1.Text=“正在复制文件…” D．Form1.名称=“正在复制文件…” 如果要求设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于：a A．1000 B．100 C．10 D．1 3、下列关于控件的基本操作中，错误的是 A)当控件处于活动状态时，可以对控件进行缩放 B) 在设计阶段不能移动控件 C) Visual Basic 6.0 允许对画好的控件进行复制和删除 D) 可以通过属性窗口改变控件的位置和大小 4、用Visual Basic 开发应用程序的一般步骤有：①设置窗体和控件的属性、②编写代码、③建立用户界面，其中正确的顺序是： A) ①②③B) ①③②C) ③②①D) ③①② 5、为使文本框只能显示不能输入，即只读，应设置文本框的属性是：c A．MaxLength设置为0 B．Cancel设置为True C．Locked设置为True D．Read设置为True 6、InputBox函数返回值的类型为。B A．数值B．字符串C．变体 D．数值或字符串（视输入的数据而定） 7、为了把焦点移到某个指定的控件，所使用的方法是：A A．SetFocus B．Visible C．ReFresh D．GetFocus 8、函数String(3,”str”)的功能是：b A．把数值型数据转换成字符串 B．返回有3个字符串组成的字符串 C．从字符串中第3个字符 D．从字符串中第3个字符的位置开始取字符串 9、双击窗体中的对象后，Visual Basic将显示的窗口是：c A．项目（工程）窗口B．工具箱C．代码窗口D．属性窗口 10、用于获得字符串s最左边4个字符的函数是：a A．Left(s,4) B．Left(1,4) C．LeftStr(s) D．LeftStr(3,4) 11、以下程序段的输出结果是：d a=Sqr(3) b=Sqr(2) c=a>b Print c A．-1 B．0 C．False D．True 12、用下面语句定义的数组的元素个数是：c Dim A (-4 to 6) As Integer A．6 B．7 C．11 D．9
87题 下列可作为Visual Basic变量名的是（D）。 A.a#a B.4a C.?xy D.C.onst_a 为了描述x>y和y>z同时成立，则下述选项中，正确的是（D）。 A.x>y .and Y>z B.x>y>z C.x>y and >z D.x>y and y>z 下列（B）是日期型数据。 A.@Januaryl0，1997@ B.#Januaryl0，1997# C. Januaryl0，1997 D.&Januaryl0，1997& 名称（D）表示变体类型数据。 A.Double B.Currency C.Boolean D.V ariant 在表示字符串时，可作为字符串尾部符号的是（D）。 A.# B.! C.& D.$ 在一个语句行内写多条语句时，语句之间应该用（D）分隔。 A.逗号 B.分号 C.顿号 D.冒号 Visual Basic的逻辑类型数据占（A）字节内存。 A.2 B.4 C.8 D.16 在代码编辑器中，如果一条语句太长，无法在一行内写下(不包括注释)，要折行书写，可以
在行末使用续行字符（A），表示下一行是当前行的继续。 A.一个空格加一个划字符( _) B.一个划字符(_) C.直接回车 D.一个空格加一个连字符( -) 表达式1.5+3\2>2 Or 7 Mod3 < 4 and Not 1的运算结果是（A）。 A.-1 B.0 C.1 D.其他 表达式4+5 \ 6 * 7 / 8 Mod 9 的值是（B）。 A.4 B.5 C.6 D.7 表达式Left( how are you ，3)的值是（A）。 A.how B.are C.you D.how are you 表达式Int(5*Rnd+1)*Int(5*Rnd-1)的值的范围是（D）。 A.[0,15] B.[-1,15] C.[-4,15] D.[-5,15] 满足当x的值是偶数时为真，奇数时为假要求的表达式是（D）。 A.x Mod 2=0 B.Not x Mod 2<>0 C.x\2*2-x)=0 D.Not(x Mod2) 函数Ucase( Basic )的值为（D）。 A.Basic B.basic C.BasiC D.BASIC 可以同时删除字符串前导和尾部空白的函数是（C）。 A.Ltrim B.Rtrim
V B程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 ……
1．退出Visual Basic 的快捷键是______。A. Ctrl+Q B.Shift+Q C.Alt+Q 2．窗体设计器是用于设计______。 A．应用程序的界面 C．应用程序的代码D. Ctrl+Alt+Q B. 对象的属性D. 窗体的代码 3．启动Visual Basic 后,VB为用户建立的第一个窗体是______。 A．Form1 B.Form C．窗体1 D. 窗体 4．启动Visual Basic 后,VB为用户新建立的工程的名字是______。 A．窗体1 B. 工程1 C．窗体 D. 工程 5．工程资源管理器窗口包含的文件类型有______种。 A．1 B.2 C．3 D. 4 6．如果VB环境中缺少某个窗口，一般应从主菜单______的下拉菜单中找到相应的激活命令。 A．编辑C．调试B. 文件D. 视图 7．能够通过标准工具栏打开的窗口是______。 A．代码窗口 C．属性窗口 8．窗体文件的扩展名______。B. 设计器窗口D. 窗体布局窗口 A．.bas B. vbp C．.exe 9．工程文件的扩展名______。 A．.com D. frm B. vbp C．.exe D. bas 10．Visual Basic的编程机制是______。 A．面向过程C．事件驱动B. 面向对象D. 可视化 （三）练习题 使用VB建立一个应用软件的全过程有哪些步骤？。1．具体过程如下（1）在窗体上建立用户窗口（界面）对象。 （2）分别对对象设置属性。 （3）分别对对象事件的过程编程且完成代码输入。 （4）运行程序和调试程序。 （5）保存程序。 1． 2．保存VB文件，至少要保存几个文件？应先保存什么文件？2．至少保存2个文件，先保存窗体文件，后保存工程文件。
1．下面选项内不属于描述面向对象程序设计特征的名词是( ) A．继承性B．多态性C．连续性D．封装性 2．VB中数据类型Boolean表示布尔型，布尔型变量占( )字节。 A．4 B．3 C．2 D．1 3．表达式Cint(13.2/2)的结果是( ) A．6.5 B．6 C．7 D．5 4．表达式Len(String(6, "9"))的值是( ) A．9 B．6 C．999999 D．出错 5．要在窗体上仅显示文字，选用( )控件最合适 A．LABEL B．TEXTBOX C．COMMANDBUTTON D．IMAGE 6．从编写到运行一个完整的程序的流程是( )。 A．编译程序、运行程序B．编译程序、测试程序、运行程序 C．编写程序、编译程序、运行程序D．需求分析、编译程序 7．关于结构化程序设计的思想方法，下列选项中不属于其核心思想的是( )。 A．自顶向下B．逐步求精C．模块化D．可复用 8．下列关于算法的特征描述不正确的是( ) A．有穷性：算法必须在有限步之内结束B．确定性：算法的每一步必须有确切的含义 C．输入：算法至少有一个输入 D．输出：算法至少有一个输出 9．下面属于结构化程序设计的基本方法的是( ) A．筛选法B．递归法C．归纳法D．自顶向下 10．在VB中，表达式Mid("程序设计",2,2)的结果是( ) A．程B．序C．序设D．出错 11．以下不是描述算法的方法有( ) A．自然语言B．流程图C．伪代码D．E-R图 12．在VB中，表达式Mid("程序设计",2)的结果是( ) A．程序B．序C．序设计D．出错 13．下列程序，当单击窗体时s的值是( ) Private Sub Form_Click() Dim s as boolean a = 2: b = 3: c = 4: d = 5 s = a > b And 2 * a > c Or c <= d Print s End Sub A．TRUE B．FALSE C．-1 D．1 14．在VB中，不能作为变量名的是 ( ) A．中国B．STRING C．b_q D．a_b 15．在VB程序中，假定有以下循环结构, 则正确的描述是( ) Do While条件 循环体 Loop A．如果"条件"是一个为0的常数，则一次循环体也不执行B．如果"条件"是一个为0的常数，则执行无穷次循环体C．如果"条件"是一个为0的常数，则至少执行一次循环体D．不论"条件"是否为"真"，至少执行一次循环体16．以下哪个不是程序设计高级语言( ) [后面还有2个类似的题目，要了解每个选项] A．VC B．Pascal C．C++ D．CSS 17．在VB程序中有以下程序段，语句Print "VB"的执行次数是( ) For i=1 To 3 For j=3 To 1 Step -1 Print "VB" Next j Next i A．3 B．4 C．6 D．9 18．在VB中，表达式Cos(0)的结果是( ) A．0 B．1 C．约等于3.14 D．出错 19．在使用流程图描述算法中，表示变量的计算与赋值的符号框为( ) A．矩形框B．菱形框C．平行四边形框D．椭圆形框 20．在VB中，以下关于变量定义错误的是( ) A．Dim a As Integer B．Public a As String C．Private a As Boolean D．Dim a Integer 21．在VB中，表达式Sgn(-5.8)的结果是( ) A．-5.8 B．-5 C．-6 D．-1 22．已知f(1)=1，f(2)=2，当n≥3时，f(n)= f(n-1)+f(n-2)，编程求f(100)的值，应选择的算法为( ) A．解析法B．穷举法C．递归法D．冒泡排序法 23．下面说法正确的是( ) A．算法+数据结构=程序设计 B．算法就是程序 C．数据结构就是程序D．算法包括数据结构24．穷举法的适用范围是( ) A．一切问题B．解的个数极多的问题C．解的个数有限且可一一列举 D．设计算法 25．在VB中，表达式Log(100)的结果是( ) A．1 B．2 C．10 D．以上都不是 26．如果设计的程序需要播放Mp3音乐或avi视频文件，可用控件( ) A．label B．textbox C．mediaplayer D．data 27．表达式Asc("A")的结果类型是( ) A．数值型B．日期型C．布尔型D．字符型 28．程序运行后，要按指定的时间间隔重复自动执行某段代码，可用控件( ) A．Label B．textbox C．timer D．image 29．如果设计的程序需要与数据库进行连接，可用控件( ) A．label B．textbox C．timer D．data 30．在VB程序中，下列哪个程序行是正确的( ) A．x-5=y B．a+b=c C．y=1:y=y+1 D．i=5;i=i+1 31．在软件开发中有许多重要的环节，下列叙述中正确的是( ) A．软件维护只包括对程序代码的维护B．程序调试后一般不需要再测试 C．软件测试应该由程序开发者来完成D．需求分析与程序设计、测试、维护是软件开发中的重要环节32．如果把一个人当作对象，那么血型相当于这个对象的( ) A．属性B．方法C．事件D．过程 33．算法是解决问题的步骤序列，正确的序列是( ) ①分析问题；②提出问题；③设计算法 A．②①③B．①②③C．①③②D．②③① 34．不论多么复杂的程序，在程序设计中都可以归为( )等三种基本控制结构的组合。 A．树形、网形、环形B．主程序、子程序、函数 C．输入、处理、输出D．顺序、选择、循环 35．对于一个类，用户能定义的构造方法的个数可以为( ) A．多个B．0个C．1个D．2个 36．对算法描述正确的是( ) A．算法是解决问题的步骤B．解题的步骤可以是无穷的 C．算法就是解题的算式D．算法是可以被表述但无法实现 37．生活中有许多工作可以通过编程来解决，但以下描述中，不宜使用编程来处理的是( ) A．编写《调查报告》B．编写机器人灭火程序C．编写导弹自动防御系统D．编写学籍管理系统软件38．以下哪个是算法的描述方法( ) A．顺序法B．流程图描述法C．枚举法D．列表法 39．如图所示的流程图表示的是程序哪一个基本结构( )
87 题下列可作为Visual Basic 变量名的是（D ）。 A. a#a B. 4a C. ?xy D. C.onst_a 为了描述x>y 和y>z 同时成立，则下述选项中，正确的是（ A. x>y .and Y>z B. x>y>z C. x>y and >z D. x>y and y>z 下列（B）是日期型数据。 A. @Januaryl0 ，1997@ B. #Januaryl0，1997# C. Januaryl0，1997 D. &Januaryl0 ，1997& 名称（D）表示变体类型数据。 A. Double B. Currency C. Boolean D. V ariant 在表示字符串时，可作为字符串尾部符号的是（D）。 A. # B. ! C. & D. $ 在一个语句行内写多条语句时，语句之间应该用（D）分隔。 A. 逗号 B?分号 C?顿号 D.冒号 Visual Basic的逻辑类型数据占（A）字节内存。 A. 2 B. 4 C. 8 D. 16 在代码编辑器中，如果一条语句太长，无法在一行内写下 D）。 （不包括注释），要折行书写，可以
在行末使用续行字符（ A ），表示下一行是当前行的继续。 A. 一个空格加一个划字符（」 B. —个划字符（_） C. 直接回车 D. —个空格加一个连字符（-） 表达式 1.5+3\2>2 Or 7 Mod3 < 4 and Not 1 的运算结果是（A）。 A. -1 B. 0 C. 1 D. 其他 表达式4+5 \ 6 * 7 / 8 Mod 9 的值是（B）。 A. 4 B. 5 C. 6 D. 7 表达式Left（ how are you ，3）的值是（A）。 A. how B. are C. you D. how are you 表达式Int（5*Rnd+1）*Int（5*Rnd-1）的值的范围是（D）。 A. [0,15] B. [-1,15] C. [-4,15] D. [-5,15] 满足当x 的值是偶数时为真，奇数时为假要求的表达式是（ D ）。 A. x Mod 2=0 B. Not x Mod 2<>0 C. x\2*2-x）=0 D. Not（x Mod2） 函数Ucase（ Basic ）的值为（D）。 A. Basic B. basic C. BasiC D. BASIC 可以同时删除字符串前导和尾部空白的函数是（C）。 A. Ltrim B. Rtrim C. Trim D. Mid