vb6.0章节练习题

习题六一、选择题答案Aadcc dc二、填空题答案1、a(I,j)+b(I,j)2、下标越界3、64、1 2 2 4 3 6第六章选择题部分解析3、sum表示a数组各元素的和X表示a数组元素和的平均值最后打印出a数组中大于平均值的元素Sum=1+2+3+4+5=15，x=3大于3的有4，55、倒着看文本框中显示什么？答：显示的是array1（1，3）+array2（2，3）的和接着往前看程序发现array1（i，j）=i+j所以array1（1，3）=1+3=4Array2(2,3)=2+3=5所以4+5=9二、填空题解析2、x数组最大元素是x（6）退出for循环时，i=7然后print x（i）相当于print x（7）但是没有x（7）这个元素，超出最大下标了。

若把print x（i）改为print x（a）则值是36第六章编程题1、Private Sub Form_Click()Dim a(1 To 20) As Integer, i As IntegerDim j As Integerj = 0 '用来表示小于60的个数Picture1.Print "产生的数组为:"Picture1.PrintPicture2.Print "其中小于60的元素有:"Picture2.PrintFor i = 1 To 20a(i) = Int(Rnd * 100 + 1)Picture1.Print a(i);If i Mod 10 = 0 Then Picture1.PrintIf a(i) < 60 Thenj = j + 1Picture2.Print a(i); " ";If j Mod 10 = 0 Then Picture2.PrintEnd IfNext iEnd SubPrivate Sub Form_Load()RandomizeEnd Sub2、Private Sub Form_Click()Dim a(1 To 10) As IntegerDim max As Integer, min As Integer, i As IntegerFor i = 1 To 10a(i) = Int(Rnd * 90 + 10)Picture1.Print a(i);If i Mod 5 = 0 Then Picture1.PrintNext imax = a(1)min = a(1)For i = 2 To 10If a(i) > max Then max = a(i)If a(i) < min Then min = a(i)Next iLabel1.Caption = "最大数为：" & maxLabel2.Caption = "最小数为：" & minEnd SubPrivate Sub Form_Load()RandomizeEnd Sub3、Dim a(1 To 20) As IntegerPrivate Sub Command1_Click()Dim x As Integer, flag As Integer, i As Integerflag = 0 '标志，表示数组中是否存在xx = InputBox("请输入x的值，为整数", "输入", 1) For i = 1 To 20If x = a(i) Thenflag = 1 'flag改变，说明存在Exit ForEnd IfNext iIf flag = 1 ThenPrint "数组中存在" & xPrint "位置：" & iElsePrint "数组中不存在" & xEnd IfEnd SubPrivate Sub Form_Click()Dim i As IntegerFor i = 1 To 20 '生成数组a(i) = Int(Rnd * 100) '题目没要求，随便的范围Next iFor i = 1 To 19 '冒泡排序For j = 20 To i + 1 Step -1If a(j) > a(j - 1) Thent = a(j)a(j) = a(j - 1)a(j - 1) = tEnd IfNext jNext iFor i = 1 To 20 '打印数组Print a(i);If i Mod 5 = 0 Then PrintNext iEnd SubPrivate Sub Form_Load()RandomizeEnd Sub4、Private Sub Form_Click()Dim a(1 To 15) As SingleDim i As Integer, c1 As Integer, c2 As Integer, c3 As Integer, avg As SingleFor i = 1 To 15a(i) = InputBox("请输入第" & i & "个学生的成绩", "输入成绩", 60)avg = avg + a(i)Next iavg = avg / 15For i = 1 To 15If a(i) > avg Then c1 = c1 + 1If a(i) < 60 Then c2 = c2 + 1If a(i) >= 90 Then c3 = c3 + 1Next iPrint "高于平均分的人数"; c1Print "<60的人数"; c2Print ">=90的人数"; c3End Sub5、Dim a(1 To 4, 1 To 4) As Integer, b(1 To 4, 1 To 4) As Integer, c(1 To 4, 1 To 4) As IntegerPrivate Sub Command1_Click()‘（2）题For i = 1 To 4For j = 1 To it = a(i, j)a(i, j) = a(j, i)a(j, i) = tNext jNext iPicture2.ClsPicture2.Print "a转置后："Picture2.PrintFor i = 1 To 4For j = 1 To 4Picture2.Print a(i, j); " ";Next jPicture2.PrintNext iEnd SubPrivate Sub Command2_Click()‘（3）题Picture2.ClsMax = c(1, 1)t1 = 1t2 = 1For i = 1 To 4For j = 1 To 4If c(i, j) > Max ThenMax = c(i, j)t1 = it2 = jEnd IfNext jNext iPicture2.Print "max=", MaxPicture2.Print "c("; i; ","; j; ")"End SubPrivate Sub Command3_Click()‘（4）题Picture1.ClsPicture2.ClsFor i = 1 To 4For j = 1 To iPicture1.Print a(i, j); " ";Next jPicture1.PrintNext iFor i = 1 To 4For j = i To 4Picture2.Print Tab(j * 5); b(i, j);Next jPicture2.PrintNext iEnd SubPrivate Sub Command4_Click()‘（5）题Picture1.ClsFor i = 1 To 4t = a(1, i)a(1, i) = a(3, i)a(3, i) = tNext iFor i = 1 To 4For j = 1 To 4Picture1.Print a(i, j); " ";Next jPicture1.PrintNext i End SubPrivate Sub Command5_Click()‘（1）题Picture3.Print "c矩阵："Picture3.PrintFor i = 1 To 4For j = 1 To 4c(i, j) = a(i, j) + b(i, j)Picture3.Print c(i, j); " ";Next jPicture3.PrintNext iEnd SubPrivate Sub Form_Load()ShowPicture1.Print "a矩阵："Picture1.PrintPicture2.Print "b矩阵："Picture2.PrintFor i = 1 To 4For j = 1 To 4a(i, j) = Int(Rnd * 40 + 30)b(i, j) = Int(Rnd * 35 + 101)Picture1.Print a(i, j); " ";Picture2.Print b(i, j); " ";Next jPicture1.PrintPicture2.PrintNext iEnd Sub。

VB章节练习题自测题1 (1)自测题2 (3)自测题3 (5)自测题4 (8)自测题5 (12)自测题6 (17)练习题7 (20)自测题8 (36)自测题10 (52)自测题11 (58)自测题12 (61)自测题1一、选择题1. 从功能上讲，VB6.0有三种版本，下列不属于这三种版本的是（）A.学习版B.标准版C.专业版D.企业版2.在正确安装VB6.0后，可以通过多种方式启动VB，以下方式中不能启动VB的是（）A.通过“开始”菜单中的“程序”命令B.通过“我的电脑”找到vb6.exe，双击该文件名C.通过“开始”菜单中的“运行”命令D.进入DOS方式，执行vb6.exe文件3.为了用键盘打开菜单和执行菜单命令，第一步应按的键是（）A.功能键F10或AltB.Shift+功能键F4C.Alt或功能键F8D.Ctrl+Alt4.VB6.0集成环境的主窗口不包括（）A.标题栏B.菜单栏C.状态栏D.工具栏5.用标准工具栏中的工具按钮不能执行的操作是（）A.添加工程B.打印源程序C.运行程序D.打开工程6.VB窗体设计器的主要功能是（）A.建立用户界面B.编写源程序代码C.画图D.显示文字7.以下叙述中正确的是（）A.用属性窗口只能设置窗体的属性B.用属性窗口只能设置控件的属性C.用属性窗口可以设置窗体和控件的属性D.用属性窗口可以设置对象的属性二、填空题1.VB6.0分为三种版本，这三种版本是____、____和____。

2.可以通过多种方式启动VB，其中的两种方式是____和____。

3.可以通过____菜单中的命令退出VB。

4.退出VB的快捷键是____。

5.VB6.0的菜单栏共有____个主菜单项。

6.快捷键Ctrl+O的功能相当于执行____菜单中的____命令；或者相当于单击工具栏上的____按钮。

7.如果打开了不需要的菜单或对话框，可以用____键关闭。

8.工程文件的扩展名是____，窗体文件的扩展名是____。

09微机升学班《Visual Basic6.0》练习题一一、选择题：1、窗体上有一个列表框和一个文本框，编写如下两个事件过程：Private Sub Form_Load()List1.Additem＂Beijing＂List1.Additem ＂Tianjin＂List1.Additem＂Shanghai＂Text1.Text= ＂＂End SubPrivate Sub List1_DblClick()x=List1.TextPrint X+Text1.TextEnd Sub程序运行后，在文本框中输入＂China＂,然后双击列表框中的＂Shanghai＂,则输出结果为________。

A.China BeijingB.China TianjinC.China ShanghaiD.Shanghai China2、在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程；Private Sub Form_Load()List1.AddITem＂357＂List1.AddITem＂246＂List1.AddITem＂123＂List1.AddITem＂456＂Text1.Text=＂＂End SubPrivate Sub List1.DblClickOM=List1.TextPrint M+Text1.TextEnd Sub程序运行后,在文本框中输入“123”,然后双击列表框中的“456”,则输出结果为________。

A.1245B.456123C.123456D.03、在列表框中当前被选中的列表项的序号是由下列________属性表示的。

A.ListB.IndexC.ListlndexD.False4、在Visual Basic中，组合框是文本框和________特性的组合。

A.复选框B.标签C.列表框D.目录列表框5、为组合框Combol增加一个数据项"计算机"，下列命令正确的是________bol.Text="计算机"bol.ListIndex="计算机"bol.Addltem "计算机"bol.ListCount="计算机"6、执行了下面的程序后，组合框中数据项的值是________。

VB6.0总复习题一、基本概念1、在设计窗体时双击窗体的任何地方，可以打开的窗口是（代码窗口,而F4键不能打开）2、以下说法正确的是（一个窗体对应一个窗体文件）。

工程文件的扩展名是.vbq3、设置窗体最小化时的图标可通过（Icon ）属性来实现p18表2-14、如果要实现当鼠标暂时停留在一命令按钮上时，显示提示信息，应设置此命令按钮的（ToolTipText）属性。

5、如果要实现窗体从内存中卸载，其实现的方法是（UnLoad）。

6、当文本框的MaxLength属性值取（0 ）时，该文本框能容纳的字符数最多。

7、焦点：使文本框获得焦点的方法是（SetFocus）。

8、当运行程序时，系统自动执行启动窗体的某个事件过程。

这个事件过程是（GotFocus）GotFocus 事件过程用以指定当控件或窗体首次接收焦点时发生的操作。

9、若使用Textbox控件时，为对用户输入的内容立即进行检查，就对Textbox控件的（Change）事件编程。

10、所有控件都具备的属性是（Name）。

11、命令按钮对象不支持DblClick事件。

12、下列4个选项中，不是VB数值常量的是（2E1.4 ）。

13、变量名不合法的是（M-d）,合法的是（k_name ）14、表达式"321" & 100 + "200"的值是（"321300”）。

15、VB6.0中执行时出现错误的是（x = Sqr(-4)x = Exp(800)）16、Sgn(x)的值为-1，则x的值是（小于0的数）。

// Sgn(x): 返回自变量x的符号，即当x为负数时，返回-1；当x为0时，返回0;当x为正数时，返回117、VB的叙述中正确的是（数组下标的下界在默认情况下从0开始）。

18、VB的叙述中不正确的是（使用ReDim语句可以改变数组的类型）。

19、在VB中声明了Variant变量，但未赋值，则系统默认其初始化值为（Empty）p40。

一、选择题1. 从功能上讲，VB6.0有三种版本，下列不属于这三种版本的是（）A.学习版B.标准版C.专业版D.企业版2.在正确安装VB6.0后，可以通过多种方式启动VB，以下方式中不能启动VB的是（）A.通过“开始”菜单中的“程序”命令B.通过“我的电脑”找到vb6.exe，双击该文件名C.通过“开始”菜单中的“运行”命令D.进入DOS方式，执行vb6.exe文件3.为了用键盘打开菜单和执行菜单命令，第一步应按的键是（）A.功能键F10或AltB.Shift+功能键F4C.Alt或功能键F8D.Ctrl+Alt4.VB6.0集成环境的主窗口不包括（）A.标题栏B.菜单栏C.状态栏D.工具栏5.用标准工具栏中的工具按钮不能执行的操作是（）A.添加工程B.打印源程序C.运行程序D.打开工程6.VB窗体设计器的主要功能是（）A.建立用户界面B.编写源程序代码C.画图D.显示文字7.以下叙述中正确的是（）A.用属性窗口只能设置窗体的属性B.用属性窗口只能设置控件的属性C.用属性窗口可以设置窗体和控件的属性D.用属性窗口可以设置对象的属性二、填空题1.VB6.0分为三种版本，这三种版本是____、____和____。

2.可以通过多种方式启动VB，其中的两种方式是____和____。

3.可以通过____菜单中的命令退出VB。

4.退出VB的快捷键是____。

5.如果打开了不需要的菜单或对话框，可以用____键关闭。

6.工程文件的扩展名是____，窗体文件的扩展名是____。

7.VB中的工具栏有两种形式，分别为____形式和____形式。

自测题2一、选择题1.下列叙述中正确的是( )A.只有窗体才是VB中的对象B.只有控件才是VB中的对象C.窗体和控件都是VB中的对象D.窗体和控件不是VB中的对象2.下列可以激活属性窗口的操作是( )A.用鼠标双击窗体的任何部位B.执行“工程”菜单中的“工具箱”命令C.按Ctrl+F4键D.按F4键3.下列不能打开工具箱窗口的操作是()A.执行“视图”菜单中的“工具箱”命令B.按Alt+F8键C.单击工具栏上的“工具箱”按钮D.按Alt+V键，然后按Alt+X键4.假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应执行的操作是()A.单击窗体上没有控件的地方B.单击任一个控件C.不执行任何操作D.双击窗体的标题栏5.为了把窗体上的某个控件变为活动的，应执行的操作是()A.单击窗体的边框B.单击该控件的内部C.双击该控件D.双击窗体6.确定一个控件在窗体上的位置的属性是()A. Width或HeightB. Width和HeightC. Top或LeftD. Top和Left7.确定一个窗体或控件的大小的属性是()A. Width或HeightB. Width和HeightC. Top或LeftD. Top和Left8.为了同时改变一个活动控件的高度和宽度，正确的操作是()A.拖拉控件4个角上的某个小方块B.只能拖拉位于控件右下角的小方块C.只能拖拉位于控件左下角的小方块D.不能同时改变控件的高度和宽度二、填空题1.假定一个文本框的Name属性为Text1，为了在该文本框中显示“Hello”，所使用的语句为。

《大学Visaul Basic程序设计》复习题第一章Visual Basic程序设计概述第一题:是非题(共10分,每项1分)1. VB6.0只能运行在Windows 2000下,不能运行在Windows 98下。

13A.对B.错√2. 用户控件和系统控件都可以加载到工具箱上,并且永久保留。

4A.对B.错√第二题、单选题(共45分,每项1.5分)1. VB中的工具栏可以从______菜单上的“工具栏”命令中移进或移出。

15A.工具B.编辑C.视图√D.调试2. 在VB的集成环境中创建VB应用程序时,除了工具箱窗口、窗体设计窗口、属性窗口外,必不可少的窗口是______。

2A.窗体布局窗口B.立即窗口C.代码窗口√D.监视窗口第二章VB的编程机制第一题:是非题(共10分,每项1分)1. 在事件驱动的应用程序中,代码是按照预定的路径执行的。

15A.对B.错√2. 标签控件即可以用来显示用户不能编辑和修改的文本,也可以用来编辑和修改文本。

9A.对B.错√3. 每一个控件实质上都是一个微型程序。

2A.对√B.错4. 窗体上的控件同样可以借助于剪贴板进行剪切、复制和粘贴。

A.对√B.错第二题、单选题(共45分,每项1.5分)1. 文本框没有_____属性。

21A.EnabledB.VisibleC.BackColorD.Caption√2. 文本框(Text1)中有选定的文本,执行Text1.SelText=”Hello”的结果是___。

9A.“Hello”将替换掉原来选定的文本√B.“Hello”将插入到原来选定的文本之前C.Text1.SelLength为5D.文本框中只有“Hello”3. 要判断“命令按钮”是否被鼠标单击,应在“命令按钮”的______事件中判断。

3A.ChangB.KeyDownC.Click√D.KeyPress4. 如果文本框的Enabled属性设为False,则___。

6A.文本框的文本将变成灰色,并且此时用户不能将光标置于文本框上B.文本框的文本将变成灰色,用户仍然能将光标置于文本框上,但是不能改变文本框中的内容√C.文本框的文本将变成灰色,用户仍然能改变文本框中的内容D.文本框的文本正常显示,用户能将光标置于文本框上,但是不能改变文本框中的内容第三题、简单程序(共15分,每项1.5分)1. 以下程序的输出结果是______。

Visual Basic 6.0第六章测试题一、填空题1、菜单控件只能使用_______________来创建，其属性可以利用_____________和_____________两种方法来设置。

2、为了显示当前日期，大写锁定键，插入键状态可以向窗体中添加__________控件。

3、打开菜单编辑器的方法有三种：1、____________________,2、_________________________，3、______________________。

4、菜单编辑器中的标题可以设置菜单项的___________属性；名称设置_________属性；快捷键设置_________属性；复选设置___________属性；有效设置___________属性；可见设置____________属性；右箭头按钮使当前菜单项级别下降一级，最低级别为______级，最高级别为_____级。

5、菜单控件只有一个事件，即_______事件。

6、如果要为菜单项创建分隔栏，则应在标题框中输入______字符。

7、如果要为菜单项创建访问键，可以标题后面添加______字样。

8、决定菜单控件是否维护当前MDI子窗口的列表的属性是__________。

9、RichTex tBox控件不仅允许______和______编辑文本，同时还提供了标准文本框控件所没有的、更高级的指定格式的许多功能。

10、RichTextBox控件能以_______和_____________两种形式打开和保存文件。

使用控件的_____________和_____________方法可以直接读写文件。

11、RichTex tBox中指出可容内字符最大数量的属性是________。

12、RichTex tBox中是否接受和显示多行正文的属性是________。

13、RichTex tBox中是否有滚动条的属性是 __________。

14、RichTex tBo x中返回或设置所选文本起始点的属性是________；返回或设置所选择字符数的属性是_________；返回或设置包含当前所选择文本的字符串的属性是__________。

Visual Basic6.0试卷答案（1-4章）（满分100分，时间：90分钟命题人：李世华）一、选择题（每题2分，共20分）1．A 2．B 3．B 4．A 5．C 6．A 7．D 8．B 9．B 10．C二、填空题（每题2分，共20分）1．Activate 2．双引号，井号（“”，##）3．False 4．对象，事件5．254 6．ScrollBars，2 7．BackStyle，0 8．ShowOpen 9．MDIChild 10．Name（名称）三、判断题（每题1分，共10分）1．错2．错3．对4．对5．错6．错7．对8．对9．对10．对四、名词解释（每题2分，共10分）1．事件：事件是由VB预先设置好的、能够被对象识别的动作2．对象：是代码和数据的组合/程序运行中的实体3．方法：指的是控制对象动作行为的方式4．属性：是对对象外在特征的描述5．变量：就是命名的存储单元位置，包含在程序执行阶段修改的数据注：名词解释的分数可以根据作题答案的含义给分，不用完全刻意对照答案五、简答题（每题5分，共20分）1．a.标识符必须以字母开头，最大长度为255b.标识符不能使用VB的关键字c.标识符不能包含在VB中有特殊含义的字符2．从低到高顺序为：逻辑运算符->比较运算符->字符串连接运算符->算术运算符3．MsgBox函数的返回值一共有7个，从1到7分别对应的按钮是“确定”、“取消”、“终止”、“重试”、“忽略”、“是”、“否”4．1.添加控件2.选取控件3.移动控件4.调整控件大小5.复制控件6.删除控件7.设置控件的格式8.设置控件的间距注：答案可不分先后六、编程题（每题10分，共20分）1．For i=1 to 100 [step 1]S=s+iNext [i]Print s2．For i=3 to 100 step 3Print iNext [i]注：以上答案中出现的变量名可随意声明,“[]”符号括起来的可有可无。

第一章练习题一、思考题1. Visual Basic有哪些特点？2. Visual Basi c的集成开发环境由哪些部分组成？每个部分的主要功能是什么？3. Visual Basic的工程包括哪几类文件？如何保存？4. 什么是对象、窗体、控件、事件和方法？5. 简述工程、工程文件和窗体文件之间的关系。

6. 叙述建立一个完整的应用程序的过程。

二、选择题1. 面向对象程序设计的英文缩写是（）。

A. DBEB. OLEC. OOPD. SQL2. Visual Basic的编程机制是（）。

A. 可视化B. 面向对象C. 面向图形D. 事件驱动3. Visual Basic是一种（）程序设计语言。

A. 过程式B. 非过程式C. 机器D. 低级4. Visual Basic集成开发环境有三种工作模式，不属于三种工作模式的是（）。

A. 设计模式B. 运行模式C. 代码编辑模式D. 中断模式5. 窗体设计器是用来设计（）。

A. 应用程序代码B. 应用程序界面C. 对象的属性D. 对象的事件6. 一个可执行的Visual Basic的应用程序至少要包括一个（）。

A. 窗体模块B. 标准模块C. 辅助模块D. 类模块三、填空题1. 程序设计语言是和交流的工具。

2. Visual Basic用于开发环境下的程序。

3. Visual Basic有三种工作模式，即模式、模式和模式。

4. 属性窗口分为四个部分，这四个部分是、、和。

“属性”窗口的功能是。

5. Visual Basic把一个应用程序称为一个，它包含各种文件。

6. Visual Basic提供了两种程序运行方式：和。

第二章练习题一、思考题1. 窗体和控件的属性都有哪些？如何设置？如何理解事件和方法？2. 如何用代码设置控件的属性？这些代码一般放在什么事件中？3. 标签和文本框的区别是什么？4. 图像控件和图形控件的主要区别是什么？5. 如何在图形控件中显示文本？6. 什么是焦点？如何设置？Tab顺序有何作用？二、选择题1．每个窗体对应一个窗体文件，窗体文件的扩展名是（）。