001套002套
003套
004套
005套
006套
007套
008套
009套
010套
011套
012套
013套
关于VB语言和怎样学习VB VB6.0全称为VisualBasic 6.0，是微软公司推出的可视化编程工具MSDN之一，是目前世界上使用最广泛的程序开发工具。如果你是一个对编程一无所知，而又迫切希望掌握一种快捷实用的编程语言的初学者，那选择VB 6.0没错的。即使考虑到VB程序本身编译和运行效率较低的不足(嘻嘻速度现在不是问题吧)，单是它的快捷的开发速度，简单易学的语法，体贴便利的开发环境，它仍不失一款优秀的编程工具，是初学者的首选。 也许你会问，我以前没学过任何一种语言，我能快速上手吗？别担心，没问题VB的语法的和QBASIB语言是基本相同的，也就是说它的语法是最容易被初学者所接受的。另外VB提供的是可视化的开发环境，我们可以象搭积木一样构建出程序的界面，而且VB提供了丰富的控件组，省去了我们自己写代码实现这些效果的麻烦，这样我们就能把更多的精力放在程序功能的实现上，所以VB学起来简单，用起来方便。 接着看看VB语言的前景，在目前各种编程语言共存的时代，VB会不会落伍呢？当然不会了，在我写这篇文章的同时，微软已经透露了VB7.0将完全面向对象的消息，可以肯定下一代VB的功能一定会强大很多，我们这些所谓的 VB 程序员总算可以放心了，VB不会落后于时代，毕竟它是使用人数最多的优秀的开发工具。 好了，侃了这么多关于VB的台前幕后，总之是为想学编程的你树立信心，编程一点都不难，只要你决定了开始，就让我们一起踏上愉快的编程之旅吧。 接下来谈谈怎样学习VB，先说说“看实例学VB6.0”系列教程，它是面向编程初学者的VB入门教程，这个教程的特点是抛开晦涩难懂的概念和语法，不做内容上的堆积和罗列，而是采用了每节一个生动有趣的小例子的形式，每个小例子中会涉及到一个或几个VB编程的知识点(可能是控件，也许会是某个函数或编程小技巧)，使你快速入门。希望你学完此教程后能达到下述的效果： 从对编程一窍不通或从未接触过编程的状态，通过学习能够对VB6.0的编程环境比较熟悉，掌握VB开发界面的使用方法；对VB语言的基本语法大致了解，知道常见的语句的意义；学习VB常用控件的使用方法，并能将它们灵活运用到应用程序中；能开发简单的VB程序。到那时你已经能够继续深入的学习VB编程，嘻嘻，目标就是这样啦。 然后谈谈学习编程的方法，万事开头难，刚刚开始，遇到些困难没关系，慢慢来。编程是一个不断学习，不断积累的过程，编程的乐趣也正是存在于学习的过程中。我们每学一点，就赶快把它用到实际的程序中去，自己多学多用多实践，水平才能不断提高，这就是“学以致用”。 另外，编程涉及到很多的知识，象操作系统的、软件工程的、硬件系统的以及编程思想等各个方面，这就需要我们多看看这方面的资料，扩充自己的知识面。 教程分为三个大的部分，它们是由浅入深的一个系列，分别是：
用VB编写一个简单的图书管理系统 Srl2011009（学号）石二辽（姓名）指导教师徐哲鑫 【摘要】笔者采用Visual Basic 为开发工具，设计一款具备友好的图形用户界面、简便操作的图书管理系统。充分利用计算机功能实现读者管理、书籍管理、借还书籍管理等信息的自动化控制，将使图书管理员从繁杂、重复的劳作中解放出来。 【关键词】图书；面向对象；软件工程 1概述 开发背景 用计算机管理图书馆里一切信息是一种计算机应用技术的创新,在计算机还未普及之前图书管理都是由图书管理人员手工记帐的方式来操作的.现在一般的图书馆都是采用计算机作为工具，使用实用的图书管理程序来帮助图书馆管理员进行更有效的图书管理。 图书管理系统产生的背景 图书管理系统是典型的信息管理系统,其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于台数据库的建立和维护要求建立起数据一致性和完整性强、数据安全性好的库。而对于前端应用程序则要求应用程序具备功能完备、友好的图形用户界面、便捷使用等特点[1]。 系统功能要求的分析 开发本系统的总体任务是实现图书管理系统的系统化和自动化，帮助图书管理员更好更高效地完成图书管理工作，本系统要完成的功能主要有: 书籍管理部分:图书类别管理和图书信息管理。其中，书籍类别管理包括添加书籍类别、修改书籍类别、删除书籍类别等；书籍信息管理包括书籍信息的添加、修改、查询、删除等。 读者管理部分:读者类别管理和读者信息管理，读者类别管理包括读者类别添加、修改、删除等；读者信息包括读者添加读者信息、修改读者信息、查询读者信息、删除读者信息等。 借阅管理部分:借书信息管理和还书信息管理，借书信息管理、还书信息管理均包括其信息的添加、修改、查询等。 系统管理部分:添加管理员,修改密码,退出系统。 2开发环境及实现技术介绍
一、基本操作题 (1)在名称为Forml，标题为“输入”、最大化按钮不可用的窗体上画1个名称为Framel的框架控件，其标题为“选择性别”;再向框架内画两个名称分别为Optionl和Option2的单选按钮，其标题分别为“男”和“女”，并将单选按钮Option2设置为选中状态。请设置相应属性使得程序执行时，窗体界面如图所示。 注意：存盘时，将文件保存至考生文件夹下，窗体文件名为sjtl.frm，工程文件名为sjtl.vbp。 (2)在名称为Forml的窗体上画1个名称为Labell的标签，其标题为“计算机等级考试”，且能根据标题内容自动调整大小，有边框(如图所示);再在窗体上画1个名称为HScrolll的水平滚动条，并将滚动条所能表示的最小值设置为10、最大值设置为20。 要求：编写适当的事件过程，使得程序运行时，当单击水平滚动条两端的箭头时，能将标签中的文字大小设置为滚动框当前位置值，程序运行后的界面如图所示。 注意：程序中不得使用变量，每个事件过程中只能写一条语句(不得使用选择语句或循环语句)。存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。 二、简单应用题 (1)考生文件夹中有工程文件sjt3.vbv。窗体上显示有一个列表框和一个文本框，且列表框中已有若干列表项。程序的功能是，程序运行时，当用户在列表框中单击并选中某个列表项时，该项的内容将显示到文本框中，用户可以在文本框中对相关内容进行编辑，按回车键后，能够用编辑好的内容替换被选中的列表项，并自动清空文本框;当双击某个列表项时，则从列表框中删除该列表项;当用户直接在文本框中键入文
VB最简单入门教程
目录 （提示：按ctrl,并单击鼠标，可以跳到相应页） 9
1.1 1 我们需要什么 我们需要什么？当我们在一个精彩的游戏世界中游历了一番之后，或是惊叹于某一工具软件的小巧精致之余，多少总会产生些许编程的冲动。编程吗，在以前如果你对电脑还是一个门外汉，那实在是一件可望而不可及的事情。如果运用基于DOS下的编程语言，譬如C、Qbasic、Pascal等等，真不知何年何月才能有所成就。 编程是需要天赋的，你必须在大脑中对整个程序有一个清晰的轮廓，一个高效的流程，这并不是每个人都能做到的，你必须思之慎之，这也使编程变成一件最枯燥无味的事情。但在第四代计算机语言（可视化编程）出现后，可以确切的说它开发了人们的更多天赋，并不局限于那些头脑异常清晰的人，每一个人都可以发现自己也可以编出一些从前不敢问津的程序，想象力的充分发挥才是第四代语言的精粹。 Visual Basic（以下简称VB）可以说是可视化语言的先驱了，而且它也是可视化程度最高的一个，从几年前VB诞生之日起到现在，它已经经历了五个版本，而且现在微软正在紧张的进行着VB6.0的研制、测试，这么高的更新率，不外乎说明两个问题：用户对VB的热衷，微软对VB的重视。不可否认微软对市场的预测能力是极为高明的，而它强大的技术、财力支持也使它在许多以前未进入的领域，在不长的时
间内有成为最有力的竞争对手，如IE之于浏览器领域，《帝国时代》之于游戏都是最好的例证。对于VB现在也有一个很强的竞争对手――Delphi，有人把它称作VB杀手，这显然有偏激之处，VB的确有它的不足之处，但Delphi又何尝不是呢，而且以微软对VB的倾心，VB的功能必然会越来越强大。 VB的诞生 VB的出现可以说是Microsoft Windows的日渐成熟的必然产物。Microsoft Windows为程序员和最终用户提供了一个共同的人机界面。对用户，Windows提供了一个图形鼠标的操作环境，该环境对所有的应用程序都一样；对于程序员，Windows提供了一组预定义工具----称之为Microsoft Windows 的软件开发工具箱（SDK），该工具能使程序员建立一个与Windows界面相同的应用程序，而且，程序员不必关心最终用户的硬件配置情况。在这一开发环境中，程序员唯一困难的是Microsoft SDK提供了六百多个函数和与其一致的事件驱动（event-driven）编程技术。两种新方法的交叉使众多的程序员重新陷入困境，程序员不仅要掌握程序驱动编程技术和六百多个函数的功能，而且还得用C语言描述这些问题。因此一般情况下，程序员首先要掌握C程序设计技术，而后再开始学习SDK。这样的条件下就要求在Microsoft多任务环境下出现一种操作方便，使用简单的新工具－－－－Visual Basic由此诞生。 何为可视
Vb简单应用题练习题 第一题： 打开指定文件夹下的工程文件vbsj3.vbp，在名称为Form1的窗体上已经添加一个名为lblClock 的标签控件和一个名称为timeClock的计时器控件；请将标签控件lblClock的Caption属性设为空串，BorderStyle属性设为1，再设置timeClock的适当属性，并编写适当的事件过程，使得在运行时，每隔一秒种在标签中显示的数字从1开始自动加1。如图所示是程序开始运行时的界面。 请将程序中注释语句修改为正确代码，并删除注释符号；不能修改已有的程序内容，特别是不能改变程序中已有的变量名称。 注意：1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性，并将修改的结果以原文件名原位置存盘。 2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。 Option Explicit Private nCount As Long Private Sub Form_Load() nCount = 1 End Sub Private Sub timeClock_Timer() lblClock = nCount nCount = nCount + 1 End Sub 第二题： 打开指定文件夹下的工程文件vbsj3.vbp，在名称为Form1的窗体上已经添加一个名称为txtInput的文本框；两个标题分别为“对齐方式”、“字体”，名称分别为fraAlign、fraFont的框架控件；在fraAlign框架中画三个单选按钮，标题分别为“左对齐”、“居中”、“右对齐”，名称分别为optLeft、optCenter、optRight；在fraFont框架中画两个单选按钮，标题分别为“宋体”、“黑体”，名称分别为optSt、optHt。 要求：编写五个单选按钮的Click事件过程，使程序运行时，单击这些单选按钮，可以对文本框中的文字实现相应的操作效果，如图所示。
【HNCE网上考试系统 v9.6】? 本套软件使用权属于：郑州大学 考试课程:VB-程序设计-练习? 考试时间:90分钟? 考场:第一考场? 考试日期: 剩余时间：88:09 保存交卷退出帮助本卷共有2道大题: 一、单项选择题（50道小题，共50分） 1、与传统的程序设计语言相比较，Visual?Basic最突出的特点是______。（1分） A、结构化的程序设计 B、数据处理 C、面向对象的可视化编程 D、中文支持 2、任何控件都具有的属性是______。（1分） A、Picture B、Caption C、Name D、AutoSize 3、保存一个Visual?Basic应用程序，正确的是______。（1分） A、只保存工程文件(.vbp) B、只保存窗体文件（.frm） C、只保存标准模块文件（.bas） D、分别保存窗体文件和工程文件 4、处于设计状态时，在窗体上双击鼠标，则系统在代码窗口显示的事件过程模板是______。（1分）
A、Load B、Click C、DblClick D、MouseDown 5、启动Visual?Basic后，VB为用户建立的第一个窗体是______。（1分） A、Form B、Form1 C、窗体1 D、窗体 6、程序如下：i?=?0:?s?=?0:?Do:?i?=?i?+?2:?s?=?i?+?s:?Loop?Until?i?>?4，执行后s的值是______（1分） A、10 B、11 C、12 D、15 7、表示年龄(age)在20岁和30岁之间的表达式是______。（1分） A、age>=20?And?age<=30 B、age>=20?0r?age<=30 C、age<=20?And?age>=30 D、age<=20?0r?age>=30 8、文本框中的ScrollBars属性已设置为?3-Both，但却没有水平和垂直滚动条的效果，原因可能是______。（1分） A、文本框中没有内容 B、文本框的MultiLine属性为False
课本第3章习题参考答案（第100页） 1. 输入梯形的上边长、下边长及高度，计算梯形的面积并输出。要求使用InputBox 函数输入，使用Print方法输出。 2. 输入小时、分、秒，将它们换算为秒，然后输出。要求使用文本框分别输入，使用标签输出。 3. 输入直角三角形的两个直角边，输出其斜边、周长和面积。要求使用InputBox函数输入，使用Print方法输出。
4. 输入4课成绩，输出总成绩和平均成绩。通过InputBox 函数输入数据，使用消息框MsgBox 进行输出。 6. 编写程序，输入x,输出如下分段函数y 的值。 10. 编写程序，输入n ，计算1 + 2 + 3 + … + n 的和。 y= 3x+2, x<0 0， x=0 2x-1, x>0
11. 编写程序计算11+ 22 +33 + 44 + …+ 1010的和。 12. 编写程序，输入10个同学的成绩（0～100），输出最高成绩和最低成绩。 13. 编写程序，输出100以内的素数。
14. 输入若干个学生的成绩，统计其中90分以上、70～89分、60～69分、小于60分的人数并输出。当输入的成绩小于0时结束输入。 16. 用矩形法求指定区间内函数f (x)的积分 10)(dx x f ，其中发f (x) =1 + sin (x)。
17. 输入任意一个字符串，将其逆序后输出，例如，输入的字符串为“abcde”，则输出为“edcba”。 18. 输入任意一一个字符串，分别统计其中字母A、E和Z的个数，不区分大小写。 课本第4章习题参考答案（第136页）
用VB编写一个密码解锁界面 我也是刚开始学VB语言，VB语言很强大，有别于其它语言，操作性很强，是很富有创造性的电脑语言。 下面是我看了两天书后编写的一个小程序： 功能是能建立两个窗口，一个密码窗口，一个为修改密码窗口。当密码输入正确后才能打开或者做一些事情，点击修改密码跳往第二个界面，修改成功后以修改的密码为解锁密码。中间有错误提示和误操作提示。 ①先建立一个小窗口，如下图： 帐号一的“textbox”编号为“text1”，后面一次类推，command指令为1。 ②程序的编写 Text1： 初始帐号为“07823”，如果可以的话可以给加入更多的功能，比如记忆多个账户和多对密码之类的等等。
2、text2 3、command1 初始密码为“1234”，open函数可以打开文件，自己可以设置文件路径。 4、command2 跳往第二个界面，隐藏第一界面。 5、初始指令 6、全局变量 全局变量本界面可以修改、其它界面可以调用的变量。
②建立第二个窗口 Text的序号从上到下依次顺序排列，command的命令一次从左到右排列 ③第二个窗口的程序编写 1、Text1： Private Sub Text1_LostFocus() Dim b As Integer Dim pw_1 As String, pw_2 As String pw_2 = Form1.m pw_1 = Text1.Text If pw_1 <> pw_2 Then b = MsgBox("密码错误", 5 + vbExclamation, "错误提示") End If End Sub 2、text2： Private Sub Text2_LostFocus() If Text2.Text = "" Then MsgBox "新密码不能为空" End If End Sub 3、text3： Private Sub Text3_LostFocus() If Text2.Text <> Text3.Text Then MsgBox "两次输入密码不一样" Text2.Text = "" Text3.Text = "" Text2.SetFocus End If End Sub
计算机二级考试《VB》模拟试题及答案 2016计算机二级考试《VB》模拟试题及答案 一、基本操作题 (1)在名称为Forml、标题为“球类项目”且没有最大化和最小化按钮的窗体上画1个名称为Combol的组合框。组合框中的文本内容为空，表项内容有“乒乓球”、“羽毛球”和“网球”3项。运行后的窗体如图所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtl.vbp，窗体文件名为sjtl.frm。 (2)在名称为Forml、标题为“转换”的窗体上，画1个名称为Shapel、边框宽度为3的形状。再画两个标题分别为“椭圆”和“圆”的命令按钮。如下图所示。 要求：编写适当的事件过程，使得单击“椭圆”按钮时，Shapel 的形状变换为椭圆;单击“圆”按钮时，Shapel的形状变换为圆。程序中不得使用变量，每个事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjr2.vbp，窗体文件名为sjr2.frm。 二、简单应用题 (1)在考生文件夹下有一个工程文件sjt3.vbp。窗体Forml上有两个标题分别是“读数据”和“查找”的命令按钮。请画1个名称为Textl、初始值为空的文本框，该文本框允许显示多行内容，且有垂直滚动条，如图所示。程序功能如下。 ①在考生文件夹下的in.3.dat文件中存有100个正整数。单击“读数据”按钮，则将文件in3.dat中的数据读入数组a中。 ②单击“查找”按钮，则查找数组a中所有为7的倍数的数据，并将这些数据顺次显示在Textl文本框内(数据之间用空格隔开)。
“读数据”按钮的Click事件过程已经给出，请编写程序完成“查找”按钮的Click事件过程，实现上述功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须使用“查找”按钮完成查找过程，且必须用窗 体右上角的关闭按钮结束程序，否则无成绩。最后将程序按原文件 名存盘。 (2)考生文件夹下有一个工程文件sit4.vbp。在窗体Forml上有 两个名称为Commandl和Command2、标题分别为“重输”和“查找”的命令按钮。程序功能如下。 单击“重输”按钮，则清空Textl中的`内容，等待用户输入由 空格隔开的若干个英文单词;单击“查找”按钮，则找出Textl中最 长的单词，并将其显示在Text2中。某一次的运行效果如图所示。 请将“查找”按钮的Click事件过程中的注释符去掉，把?改为正确 内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。 三、综合应用题 考生文件夹下有一个工程文件sjt.s.vbp。在窗体Forml上有两 个标题分别是“产生数据”和“重新排列”的命令按钮，有两个标 题为“原始数据”和“排列数据”的标签。程序功能如下。 ①单击“产生数据”按钮，则随机产生20个一位整数，存人数 组a中，并同时显示在Textl中。 ②单击“重新排列”按钮，则重新排列数组a中的元素：使等值的元素相邻存放，并且保持它们在数组a中首次出现的相对次序;最 后将排列结果显示在Text2中。某一次运行结果如图所示。 请将“重新排列”按钮的Click事件过程中的注释符去掉，把“?”改为正确内容，以实现上述程序功能。
初中生vb教程综合示例五 有如图一这样一个应用程序，分别拖动红、绿、蓝三个滚动框来决定文本框的背景色，另外还有一个竖向滚动条，可以用来控制文本框的大小。 图一 一、图像的着色问题： 自然界中千变万化的色彩，在电脑上可以用红绿蓝三种原色组合而成，这也正是图像处理软件中 RGB 模式的原理所在，如黑色是由皆为 0 的红绿蓝三种颜色组成，白色为皆为 255 的三原色合成，等等。 在 RGB 模式中，每种色彩最多有 255 种变化，也就是说，只要 R 、G 、B 三种色彩都在各自的 255 范围内，这种色彩就是有效的。 在 VB 中，也用 RGB 来作为色彩的描述，如文本框的背景色为白色，则表示为：Text1.Backcolor = RGB(255，255，255)。 二、VB 中对象的初值储存问题： 在VB中，常常会对某个对象进行位置移动，或者动态改变对象的尺寸，一般情况下，都会在程序调入后先对原始数据进行一些存储，以便发生位移或改变大小后能恢复原样，而这一功能，是通过初值储存来完成的。 方法是，将原始数据，如坐标值、原始长宽高，等等，赋值给某个变量，最后通过变量的调用就能完成默认状态的恢复。 三、程序设计： 1、创建如图一的程序界面。 文本框的属性： Name：TxtContent Text：None 三个表示色彩的标签： 红色标签，Name：LblRed Caption：红色 绿色标签，Name：LblGreen Caption：绿色 蓝色标签，Name：LblBlue Caption：蓝色 三个表示色彩的横向滚动条： Min：0 Max：255 SmallChange：1 LargeChange：5 显示“大小”字样的标签： Name：LblSize Caption：大小 对文本框大小进行控制的竖向滚动条：
第一题： Vb 简单应用题练习题 打开指定文件夹下的工程文件 vbsj3.vbp ，在名称为 Form1 的窗体上已经添加一个名为 lblClock 的标签控件和一个名称为 timeClock 的计时器控件；请将标签控件 lblClock 的 Caption 属性设为空串，BorderStyle 属性设为 1，再设置 timeClock 的适当属性，并编写适当的事件 过程，使得在运行时，每隔一秒种在标签中显示的数字从 1 开始自动加 1。如图所示是程序 开始运行时的界面。 请将程序中注释语句修改为正确代码，并删除注释符号；不能修改已有的程序内容，特 别是不能改变程序中已有的变量名称。 注意：1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性，并将修改的 结果以原文件名原位置存盘。 2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。 第二题： 打开指定文件夹下的工程文件 vbsj3.vbp ，在名称为 Form1 的窗体上已经添加一个名称 为 txtInput 的文本框；两个标题分别为“对齐方式”、“字体”，名称分别为 fraAlign 、fraFont 的框架控件；在 fraAlign 框架中画三个单选按钮，标题分别为“左对齐”、“居中”、“右对齐”， 名称分别为 optLeft 、optCenter 、optRight ；在 fraFont 框架中画两个单选按钮，标题分别为 “宋体”、“黑体”，名称分别为 optSt 、optHt 。 要求：编写五个单选按钮的 Click 事件过程，使程序运行时，单击这些单选按钮，可以 对文本框中的文字实现相应的操作效果，如图所示。 注意：1.不能修改其他代码行，并将修改的结果以原文件名原位置存盘。 2.若涉及给对象属性赋值，必须指定属性名，不可使用对象的默认属性。 3.程序中不得使用变量，每个事件过程中只能写一条语句。 第三题：
VB选考冒泡排序综合应用题 姓名班级 第一题：2017年11月选考真题 小李基于冒泡排序算法编写了一个VB程序，功能如下：在文本框Text1中显示排序前的数据，单击“排序”按钮Command1,在文本框Text2中显示剔除重复数据后的升序排序结果。程序运行界面如下图所示。 实现上述功能的VB程序如下，请完成划线处填空。 Const n = 10 Dim a(1 To n) As Integer Private Sub Command1_Click() Dim i As Integer, j As Integer, t As Integer Dim bottom As Integer '获取排序前数据依次存储在数组a中，并在文本框Text1中显示。代码略 bottom = n i = 1 Do While i <= bottom - 1 For j = bottom To i + 1 Step -1 If ① Then t = a(j): a(j) = a(j - 1): a(j - 1) = t ElseIf a(j) = a(j - 1) Then ' 相邻两个数据相等，进行剔除处理 ② bottom = bottom - 1 End If Next j ③ Loop = " " For ④ = + Str(a(i)) Next i End Sub 第二题：2019年4月选考真题 小明基于冒泡排序思想设计了一个改进的排序算法。该算法先用冒泡法将数组a中奇数位置的元素、偶数位置的元素分别进行排序，然后再进行后续处理。程序界面如下图：
算法的VB程序段如下，请完成划线处填空。 ’待排序数据存储在数组a中（a（1）~ a（n）），要求升序排列 For i = 1 To (n - 1) \ 2 For ① If a(j) > a(j + 2) Then t = a(j): a(j) = a(j + 2): a(j + 2) = t End If Next j Next i For i = 1 To n \ 2 ② If a(j) > a(j + 1) Then t = a(j): a(j) = a(j + 1): a(j + 1) = t Next i For ③ t = a(i): j = i - 1 Do While t < a(j) a(j + 1) = a(j): j = j - 1 Loop ④ Next i 第三题：合唱队列是按队员的身高进行排列，形成中间高两边有序降低的队形；例如有六个队员“已、戊、丁、丙、乙和甲”的身高依次由小到大，则排列后的顺序为“戊、丙、甲、乙、丁、已”。小李用VB编写模拟“合唱队列”程序，功能如下：在文本框Text1中输入各队员身高，输入结束并回国，由输入的各队员身高分别存入数组a中；单击“合唱队列”按钮command1，对数组a的元素进行有序排列后，将各元素存入数组C中形成合唱队列，并将结果显示在文本框Text2中。程序运行界面如图所示：甲、乙、丙、丁、戊和已。 实现上述功能的VB程序如下： 实现上述功能的VB程序如下，请在划线处填入合适代码。 Const n = 5 Dim a(1 To n) As Integer Dim i As Integer Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then '回车键的ascii码13 ① If i <= n Then a(i) = Val() em a(i) If i < n Then = ""
一、算术函数 1、Abs(<表达式>) 返回数值表达式的绝对值。 如：Abs(-3)=3 2、Int(<数值表达式>) 向下取整。 如：Int(3.25)=3，Int(-3.25)=-4 3、Fix(<数值表达式>) 取整函数。 如：Fix(3.25)=3，Fix(-3.25)=-3 4、Round(<数值表达式>[,<表达式>]) 按指定位数四舍五入。 如：Round(3.2553,1)=3.3，Round(3.754,0)=4 5、sqr(<数值表达式>) 计算平方根。 如：sqr(9)=3 6、Rnd(<数值表达式>) Int(Rnd*(b-a)+a ): 在[a，b )区间内产生随机整数 Randomize[(x)]：每次运行时，要产生不同序列的随机数 如： 产生1-100的随机数： Int(Rnd *100)+1 产生一个二位数： Int(Rnd*90)+10 产生1-30的随机数： Int(Rnd*30)+1 二、字符串函数 1、InStr([Start,]
如：Dim str As String*10 Dim i Str=”123” i=12 len1=Len(“12345”)…返回5 len2=Len(12) …出错 len3=Len(i) …返回2 len4=Len(“考试中心”)…返回4 len5=Len(str) …返回10 3、字符串截取函数 Left(<字符串表达式>,
VB程序设计试题及答案（三） 一、单选题 1. Visual Basic是一种面向对象的可视化程序设计语言，采取了 A 的编程机制。 (A) 事件驱动(B) 按过程顺序执行 (C) 从主程序开始执行(D) 按模块顺序执行 2. 若要使标签控件显示时不覆盖其背景内容，要对 D 属性进行设置。 (A) Backcolor (B) BorderStyle (C) Forecolor (D) Backstyle 3. 在Visual Basic中最基本的对象是 C ，它是应用程序的基石，是其他控件的容器。 (A) 文本框(B) 命令按钮 (C) 窗体(D) 标签 4. 要判断在文本框是否按下Enter键，应在文本框的 D 事件中判断。 (A) Change (B)KeyDown (C) Click (D)KeyPress 5. 数学表达式3≤x
VB典型程序！ 1、设计采用欧几里德算法求解两个自然数的最大公约数的程序。 Private Sub command1_click() Dim m As Long, n As Long Dim r As Long m = Val(Text1.Text) n = Val(Text2.Text) If m < 1 Or n < 1 Then Text3.Text = "数据错误" Else Do r = m Mod n m = n n = r Loop Until r = 0 Text3.Text = CStr(m) End If End Sub 2、从由字母、数字组成的字符串中找出所有大写字母并逆序输出的程序 Private Sub Command1_Click() Dim s As String, d As String, t As String Dim i As Integer Text1.SetFocus s = Text1.Text For i = 1 To Len(s) If Mid(s, i, 1) >= "A" And Mid(s, i, 1) <= "Z" Then t = t & Mid(s, i, 1) End If Next i For i = Len(t) To 1 Step -1 d = d & Mid(t, i, 1) Next i Text2.Text = d End Sub 3、编写程序，找出所有三位水仙花数。所谓水仙花，是指各位数字的立方和等于该数本身的数。例如，153=1^3+5^3+3^3，,所以153是一个水仙花数。 Option Explicit Private Sub command1_click() Dim I As Integer, a As Integer, b As Integer, c As Integer Dim st As String For a = 1 To 9 For b = 0 To 9 For c = 0 To 9
实验一VB集成环境及简单应用程序的建立 一、实验目的 (1)掌握VB6．0的启动与退出。 (2)了解VB6．0的集成开发环境，熟悉各主要窗口的作用。 (3)了解VB6．0应用程序的开发过程。 (4)理解VB中对象的概念。 (5)掌握在VB6．0中使用帮助的方法。 二、相关知识 1．VisualBasic6．0的启动与退出 VisualBasic6．0的启动与退出与一般的Windows应用程序的启动与退出一样，可以通过“开始”菜单启动VisualBasic6．0，也可以将VisualBasic6．0程序以快捷方式放在桌面上，然后双击该图标将其启动；退出可以在“文件”中选择“退出”、或双击窗口控制菜单图标、或单击窗口关闭按钮。 2．VisualBasic6．0的集成开发环境 VB6．0的集成开发环境在一个公共环境中集成了设计、编辑、编译和调试等许多不同的功能，它由菜单、工具栏、工具箱、浏览器及完成各种特定功能的窗口组成。 3．VB应用程序的开发过程 VB采用的是一种“可视化”的编程方法，可以先设计应用程序的外观，然后再编写不同部件的程序代码。 4．VB中对象的概念 对象是基本的运行时的实体，它既包括了数据(对象属性)，也包括作用于对象的操作(方法)和对象的响应(事件)。对象的属性用来表示对象的状态，对象的方法决定了对象可以进行的操作。不同的对象具有不同的属性和方法，VB中最主要的两种对象是窗体和控件，程序设计中，基本的设计机制就是改变对象的属性、使用对象的方法和为对象编写事件过程。5．VB6．0的帮助功能 VB6．0是VisualStudi06．0的套件之一，VB6．0本身并不带帮助，微软公司为VisualStudio6．0提供了一套MSDN Library帮助系统。MSDN(Microsoft Developer Network)是使用Microsoft开发工具或是以Windows或Internet为开发平台的开发人员的基本参考，它是一本集程序设计指南、用户使用手册以及库函数于一体的电子词典，使用MSDN Library 的帮助功能，不仅可以引导初学者入门，还可帮助各种层次的用户完成应用程序的设计。 三、实验举例 (实例1)VB的启动与退出。 (1)启动VB6．0 通过“开始”菜单启动VisualBasic6．0，操作步骤为： 1单击Windows桌面任务栏的“开始”按钮，弹出“开始”菜单，将鼠标指针指向“程序” 选项，在“程序”项的级联菜单中选中“MicrosoftVisualBasic6．0中文版”，然后在其打开的下级级联菜单中将光标条定位在“MicrosoftVisualBasic6．0中文版”命令上。
【HNCE网上考试系统】本套软件使用权属于：郑州大学 考试课程:VB-程序设计-练习考试时间:90分钟考场:第一考场考试日期: 剩余时间：88:09 保存交卷退出帮助本卷共有2道大题: 一、单项选择题（50道小题，共50分） 1、与传统的程序设计语言相比较，VisualBasic最突出的特点是______。（1分）
A、结构化的程序设计 B、数据处理 C、面向对象的可视化编程 D、中文支持 2、任何控件都具有的属性是______。（1分） A、Picture B、Caption C、Name D、AutoSize 3、保存一个VisualBasic应用程序，正确的是______。（1分）
A 、只保存工程文件(.vbp) B 、只保存窗体文件（.frm ） C 、只保存标准模块文件（.bas ） D 、分别保存窗体文件和工程文件 4、处于设计状态时，在窗体上双击鼠标，则系统在代码窗口显示的事件过程模板是______。（1分） A 、Load B 、Click C 、DblClick D 、MouseDown
5、启动VisualBasic后，VB为用户建立的第一个窗体是______。（1分） A、Form B、Form1 C、窗体1 D、窗体 6、程序如下：i=0:s=0:Do:i=i+2:s=i+s:LoopUntili>4，执行后s的值是______（1分） A、10 B、11 C、12 D、15
7、表示年龄(age)在20岁和30岁之间的表达式是______。（1分） A、age>=20Andage<=30 B、age>=200rage<=30 C、age<=20Andage>=30 D、age<=200rage>=30 8、文本框中的ScrollBars属性已设置为3-Both，但却没有水平和垂直滚动条的效果，原因可能是______。（1分） A、文本框中没有内容 B、文本框的MultiLine属性为False C、文本框的MaxLength属性为0 D、文本框的Locked属性是True
教学过程一、导入新课（提问法） 1、教师提出疑问：如何打开并关闭vb程序，从而导入课题？ 软件开发是一门新兴的产业，而期中程序设计就是它的最基础部分，这学期我们通过学习vb来掌握程序开发。 二、讲授新课（讲授演示法） 1、启动与退出vb 1.1启动vb：桌面上双击快捷图标，执行“开始——程序——microsoft Visual basic 6.0中文版”命令。 教师讲解，有以下四种启动方式。 方法1.使用“开始”菜单的“程序”命令； 方法2.使用“我的电脑”图标，找到“vb6.exe”并双击它； 方法3.使用“开始”菜单的“运行”命令； 方法4.利用快捷方式。 1.2 退出vb：执行“文件——退出”命令，点击标题栏的关闭按钮 2、认识vb工作环境 Vb工作环境包括：标题栏、菜单栏、常用工具栏、工具箱以及窗口。 教师讲解，有以下两种退出方式。 1.“文件”菜单－>“退出” 2.Alt＋Q 系统将提示是否存盘，根据需要回答“Y” / “ N” 3、设置vb工作环境 用户可以根据自己需要对vb程序进行相关设置，执行“视图”菜单中的命令，可以打开或关闭相应的窗口。 4、运行示例程序 演示“泡沫”、“飞舞的蝴蝶”、“计算器”。
形成性测试1、把vb工具箱中的每个控件的英文名对应的中文名标注出来 小结本课我们主要学习vb程序的基本知识： 一、启动与退出vb 二、认识vb工作环境 Vb工作环境包括：标题栏、菜单栏、常用工具栏、工具箱以及窗口。板书设计第一课 vb 开发环境简介 一、认识vb 二、演示示例程序 作业练习
课题第1课 vb 开发环境简介课类信息技术 教学目标1、知识目标： ●了解程序设计的一些术语 ●熟悉vb开发环境 ●掌握启动与退出vb的方法 2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。 3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知 欲，在不断摸索中冶情操。 前提诊测1、如何打开并关闭vb程序 导入新课软件开发是一门新兴的产业，而期中程序设计就是它的最基础部分，这学期我们通过学习vb来掌握程序开发。 教学方法任务驱动法、演示操作法 教学重点认识vb开发环境 教学难点Vb界面中各部分的功能 教学过程一、上机练习 二、知识点补充 1、程序设计语言：机器语言，汇编语言和高级语言 2、visual basic：可视化basic语言。编写程序时，可以通过鼠标操作用控件组成程序的窗 口界面，然后再编写相应的程序代码。 形成性测试1、把vb工具箱中的每个控件的英文名对应的中文名标注出来 小结本课我们主要学习vb程序的基本知识： 一、启动与退出vb 二、认识vb工作环境 Vb工作环境包括：标题栏、菜单栏、常用工具栏、工具箱以及窗口。 板书设计第一课 vb 开发环境简介 一、认识vb 二、演示示例程序 作业P