VB实验题库.docx

VB实验题库.docx

《VB实验题库.docx》由会员分享，可在线阅读，更多相关《VB实验题库.docx（50页珍藏版）》请在冰点文库上搜索。

VB实验题库

欢迎利用本系统

利用说明：

进入主界面你会看到，上面有实验题、考试题、工具、帮忙和退出。

在实验中一共有十六个实验，如假设为灰色的，那么表示些实验题目尚未，请谅解！

你能够任选一个其中一个进入实验界面。

单击考试会进入考试界面，考试界面有程序设计、程序修改、再做一题、工具、帮忙和返回，单击程序设计或程序修改，可在二者这间进行切换，如想重做一题可单击再做一题，就会产生新题目。

实验中题目上显示题目号，及你利用的时刻，主菜单有实例，实验一，实验二等,和工具，帮忙和返回，你能够自由选择做题。

如想做另外一个实验可单击返回，再选择。

工具：

系统设置可进行题库设置，设置背景色可对当前的界面进行背景设置，还原背景色可使背景色还原为系统默许设置。

帮忙：

可查看，思路分析、参考程序、运行情形、及保留途径。

程序设计题的操作步骤是：

1．考生能够在考生目录中找到工程文件，双击打开该工程文件，感动工程文件；

2、程序界面设计，要求考生设置窗体指定的一些属性、在窗体添加控件，并设置控件的某些属性；

3、编写或修改程序代码，依照题目代码窗口顶用---n---（n为1，2，3，4，5）部份删除后改成适合的内容，调试运行程序使其达到该题目的要求。

在调试进程中，考生可通过运行考生目录下的文件来查看程序的最终成效。

把自己完成的程序运行同它比较，假设有不同再次检查你的界面设计和程序代码是不是正确。

使最后程序运行成效与运行结果相同。

再按要求保留工程。

若是你的运算机中没有工程，你必需先自己新建一工程，按题目的要求设计界面、添加所需控件和设置相关属性，然后将题目所附的参考程序输入，将其顶用---n---（n为1，2，3，4，5）部份删除后改成适合的内容，调试运行程序使其达到该题目的要求。

程序调试题的操作步骤是：

1．要求考生成立一工程，将这一模块程序添加到工程中。

若是你是通过双击标准模块程序进入VisualBasic系统的，那么第一需要添加一个窗体模块。

2．将该标准模块程序中代码的指定的错误修更正确或在指定的空位填上适当的语句，并在窗体模块中编写代码（常常写在窗体的Click（）事件中）挪用标准模块中的Sub进程或用户自概念函数（若是在标准模块程序有多个进程或函数，要注意挪用的前后顺序，不然得不到正确结果），调试运行程序，使其能输出正确结果。

3．按试题要求保留工程。

若是你的运算机中没有模块程序，你必需先自己新建一工程，再添加一个默许标准模块，将题目所附的参考程序输入，将其顶用---n---（n为1，2，3，4，5）部份删除后改成适合的内容或将用****错误n****标示的下一语句中的错误更正，然后调试运行程序使其达到该题目的要求。

注：

如不能选取题目那么表示你当前的题库途径不对或网络不通，请进入工具中的系统设置进行题库途径设置。

实验一，VB应用程序的创建，实验目的

1．熟悉VB的集成环境及其大体操作。

2．把握一个VB应用程序的组成及创建方式。

3．明白得面向对象编程的机制及编码进程。

实例一

设计一简单应用程序，在窗体上放置1个文本框、2个命令按钮，用户界面如图1所示。

程序功能是：

当单击第一个命令按钮（Command1）“显示”时，在文本框中显示“这是我的第一个VB程序”，命令按钮的题目变成“继续”，再单击该命令按钮，那么文本框中显示“请你赐教，谢谢！

”，第一个命令按钮的题目又变成“显示”，且第二个命令按钮（command2）“终止”变成可用。

程序运行后窗体界面如图1所示。

图1程序运行界面

实例二

编一模拟袖珍计算器的程序，运行界面如图1所示。

图1程序运行界面

第一题：

编一程序，在屏幕上显示"你好，VisualBasic系统"，字体大小设为三号、颜色为红色，（见图1），单击窗体后，在窗体上显示"第一次见面，请多关照！

"，同时窗体上显现两个命令按钮"继续"和"终止"，如图2所示，若是单击"继续"按钮，那么又回到初始运行状态；单击"终止"按钮即终止程序运行。

图1程序运行后初始界面

图2单击窗体后的程序界面

第二题

设计一程序，在文本框中输入字符串，单击命令按钮，在文本框中输入的内容以黑体字显示在标签上，程序设计和运行界面如图1和图2所示。

图1

图2

第三题

在例如二的袖珍计算器上增加求余、乘方的运算功能。

实验二，顺序结构程序设计，实验目的

1．把握VB的数据类型、常量、变量、运算符和表达试。

2．把握VB的经常使用函数的利用。

3．把握赋值语句、用户交互函数InputBox与MsgBox的利用。

4．进一步明白得VB应用程序的编程机制。

实例一、设计一个收款计算程序（界面如图1所示），用户输入“数量”、“单价”、“折扣”后，单击“计算”按钮，那么将显示“应付款”；单击“累计”按钮，可将上次款累计显示到“累计”中，单击“清除”按钮，清除除“累计”之外的所有数据。

图1窗体运行界面

实例二、设计一个函数计算器。

其功能要求如下：

（1）运行的初始界面如图1所示，用命令按钮“ON/OFF”来开关计算器，处于打开状态的用户界面如图2所示。

关闭时回到初始状态。

（2）Sin、Cos、Sqr、Int、Fix、Hex$等函数将文本框中的数据作为函数的输入参数，单击这些函数命令按钮，又在文本框中显示其函数值。

（3）单击“Rnd”按钮，将把文本框中的内容转换为数值，作为系统随机发生器的种子数，再用Rnd函数产生一随机数，并显示在文本框中。

（4）单击“Date”按钮在文本框中显示系统日期；单击“Time”按钮在文本框中显示系统的时刻。

（5）单击“InputBox”按钮，弹出一对话框，提示输入姓名，当用户输入后，再将输入信息显示在文本框中。

单击“MsgBox”按钮，将文本框中的内容通过一信息框显示出来，要求信息框提供给用户的有“是”、“否”、“取消”3个按钮，依照用户的不同选择，将函数返回结果显示在文本框中。

（6）当在文本框中输入一个可执行的命令文件名（含盘符、途径、文件名）时，单击“Shell”按钮那么可运行指定的运用程序。

图1函数计算器关闭的界面

图2函数计算器开状态的界面

第一题

调试实例二的函数计算器程序，并编写其中没有给出的函数命令按钮的单击事件进程。

第二题

设计一个用运算机给出两位整数加法练习题程序。

程序运行界面如图1所示，单击一次，那么在文本框中产生一题。

图1程序运行界面

提示：

（1）将文本框的Multiline属性设置为True，并设置垂直转动

（ScrollBars=2）；

（2）用Rnd函数产生10～99（即二位整数）之间的随机整数的表达式为Int（Rnd*90）+10；

（2）回车换行符用函数Chr（13）+Chr（10）表示。

第三题

编一个华氏温度与摄氏温度之间的转换程序，转换公式如下：

摄氏温度转换为华氏温度，F为华氏度

华氏温度转换为摄氏温度，C为摄氏度

应用程序的界面自己设计。

要求按两种方式进行转换：

（1）用命令按钮实现转换。

即单击“转换华氏”按钮，那么将摄氏温度转换为华氏温度；一样，单击“转换摄氏”按钮，那么将华氏温度转换为摄氏温度。

（2）不用命令按钮，当文本输入时直接完成转换。

当用户在“摄氏温度”文本输入框内输入值后按回车键，自动将摄氏温度转换为华氏温度；一样，华氏转换为摄氏的方式也是如此。

提示：

在文本框内输入时要激发KeyPress事件，当按回车键时，KeyAscii的值为13。

第四题

在文本框内输入任意字符串，例如“漂亮的西子湖”，对字符串进行字体放大或缩小，图1是通过放大操作后的界面状态。

图1程序运行进程

要求：

（1）当在文本框内输入完毕按回车键时，利用去除空格函数Rtrim（）和Ltrim（），去除字符串中前后的空格，并从头显示在文本框中。

（2）单击“放大”按钮，将文本框中的字符串放大（字体放大），放大的倍数大小通过随机函数产生（Rnd），范围在1～5倍内，倍数表达式为：

Int（Rnd*5+1）。

为了使每次运行时产生不同的放大倍数，程序初始时应执行Randomize语句。

（3）一样，单击“缩小”按钮，进行缩小，缩小的倍数也通过上述方式产生。

（4）在做放大和缩小操作时，为了避免程序运行时错误（字体过大或过小），不该持续进行放大或缩小操作。

也确实是在执行放大操作后，“放大”命令按钮应呈暗淡色（不可操作）；一样在执行缩小操作后，“缩小”命令按钮应呈暗淡色，而“放大”命令按钮有效。

（5）单击“还原”按钮，字体大小恢复成初始状态，“放大”、“缩小”按钮也改变成可操作状态。

实验三，选择结构程序设计，实验目的

1．把握逻辑表达式、关系表达式的正确书写。

2．把握IF语句及IF语句的嵌套应用。

3．把握SelectCase语句的利用。

实例一、设计一个求解一元二次方程

的程序，要求考虑实根、虚根等情形。

程序的运行界面

实例二、设计一个由运算机来当小学低年级学生算术教师的VB应用程序，要求给出一系列的两个1~10数的四那么运算的算术题，学生输入该题的答案，运算机依照学生的答案判定正确与否，并给出成绩，单击终止命令按钮，退出应用程序。

程序的运行界面

第一题

设计一个查验用户身份的程序，运行后的界面如图1所示。

要求用户输入口令（口令只能输入数字，且长度不超过6位，输入时在文本框内以“*”显示输出），程序许诺用户最多有3次机遇，如3次都没有输入正确口令（设正确口令为一个由系统日期组成的字符串，用两位公元年号与月份、日期数字字符串组成，如系统日期是“2001年4月18日”，当输入“01418”字符串，那么为正确），那么用消息框提示“你是非法用户”并退出程序，如输入正确，那么由消息框显示“欢迎进入本系统”，单击“确信”按钮或按回车键后，利用Shell函数或进程打开Windows系统的“写字板”应用程序。

图1程序运行界面

提示：

此题的口令是随运算机系统日期不同而不同的，需要将输入的口令与系统日期字符串比较，获取系统日期字符串的表达式如下：

Right$（Str（Year（Date））,2）&Trim（Str（Month（Date）））&Trim（Str（Day（Date）））。

第二题

成立一个类似体育彩票对奖的工程，除一个窗体外还包括一个图形框（PictureBox），用InputBox输入一个7位数，当有非数字字符时，用MsgBox消息框给出提示，并要求从头输入，输入正确后，用那个数据与用Rnd产生的随机数进行比较，在图形框中给出结果。

中奖情形假设为：

全数相同为特等奖，后六位相同为一等奖，后五位相同二等奖…最后一名相同为尾奖。

程序界面自定。

第三题

输入一公元年号，判定是不是是闰年。

闰年的条件是：

年号能被4整除但不能被100整除，或能被400整除，程序界面自定。

第四题

某市公用收费标准如下：

通话时刻在3分钟以下，收费元；3分钟以上，那么每超过一分钟加收元；在7:

00～19:

00之间通话者，按上述收费标准全价收费；在其他时刻通话者，一概按收费标准的半价收费。

试计算某人在T时刻通话S分钟，应交多少费？

（程序运行界面如图1所示）

图1程序运行界面

要求：

当单击“通话开始”命令按钮时，在“开始时刻”文本框内显示开始的时刻，当按“通话终止”命令按钮时，那么在“终止时刻”文本框中显示终止时刻，并计算出通话时刻和通话费用，显示在相应的文本框中

第五题

输入3个数据，若是这3个数据能够组成三角形，计算并输出三角形的面积。

程序的界面自定。

提示：

（1）组成三角形的条件是：

任意两边之和大于第三边。

（2）计算三角形面积的公式是：

，其中：

实验四，循环结构程序设计，实验目的

1．把握For…..Next语句及ExitFor语句的利用。

2．把握Do….Loop循环语句与ExitDo语句的利用。

3．了解While….Wend语句的利用。

4．把握循环结构的嵌套利用。

实例一、判定一个整数是不是为素数。

分析：

素数指除能被1和自身外，不能被其他整数整除的自然数。

判定整数a是不是素数的大体方式是：

将a别离除以2、3……、a-1，假设都不能整除，那么a为素数。

事实上没必要除那么多次，因为a=sqr（a）*sqr（a），因此，当a能被大于等于sqr（a）的整数整除时，必然存在一个小于等于sqr（a）的整数，使a能被它整除，因此只要判定a可否被2、3……、Sqr（a）整除即可。

判定a被b整除可用表达式amodb=0或a/b=a\b或a/b=int（a/b）。

程序运行界面

实例二

统计文本框中英文单词的个数。

分析：

（1）从文本（字符串）的左侧开始，掏出一个字符；设逻辑量WT表示所取字符是不是是单词内的字符，初值设为False。

（2）假设所取字符不是“空格”、“逗号”、“分号”或“感叹号”等单词的分隔符，再判定WT是不是为True，假设WT不为True，那么表示新单词的开始，让单词数Nw=Nw+1；让WT=True。

（3）假设所取字符是“空格”、“逗号”、“分号”或“感叹号”等单词的分隔符，那么表示字符不是单词内字符，让WT=False。

（4）再依次取下一个字符，重复

（2）（3）步直到文本终止。

程序运行界面

实例三、设计一个文本编辑器中查找、替换程序，程序运行界面如图1。

要求设计一个带有垂直转动条的文本框，能够对文本框当选中的文本进行查找和替换的操作。

第一次单击“查找”按钮后，显现输入框用于输入查找内容，并开始在文本框中查找第一个匹配的字符串并选中，再单击“查找”按钮那么继续定位下一个匹配的字符串，直到没有匹配的字符串为止，这时能够开始其他内容的查找。

“替换为”按钮用于将文本框当选中的内容替换成指定的字符串，未选中内容那么不做替换。

图1文本查找/替换

第一题

打印如图1所示的图形。

图1程序的运行界面

第二题

编程序计算：

，精度为。

第三题

编写程序验证哥德巴赫猜想：

一个大于等于6的偶数能够表示为两个素数之和。

例如：

6=3+38=3+510=3+7

第四题

迭代法求

。

求立方根的迭代公式为：

初值

可取为a，精度为。

a值由键盘输入。

提示：

迭代法的算法思想：

关于一个问题的求解x，可由给定的一个初值x0，通过迭代公式求取得一个新的值x1，那个新值x1比初值x0更接近要求的值x；再以新值作为初值，即：

x1→x0，从头按原先的方式求x1，重复这一进程直到|x1-x0|<ε（某一给定的精度）。

现在可将x1作为问题的解

第五题

编程序打印输出找出1～1000之间所有的同构数。

所谓同构数是指一个数出此刻它的平方数的右端，如25在25平方625的右端，那么25为同构数。

第六题

有1分、2分、5分硬币假设干枚，从中掏出20枚硬币使其总值为60分，求出取法的数量和每一种取法的1分、2分、5分硬币个数。

提示：

此题属于“穷举”问题，常常采纳循环来处置，它的大体思想是：

一一列举各类可能的情形，并判定哪一种可能是符合要求的解，这种算法称为穷举法（又称“列举法”）.

第七题

编一程序，求出一字符串中最长的单词。

假设字符串中含有字母和空格，空格是用来分隔不同单词的。

程序运行界面如图1所示。

图1程序的运行界面

实验五，数组的应用，实验目的

1．明白得和把握定长数组、动态数组的概念和利用，明白得控件数组。

2．把握定长数组和动态数组的利用不同。

3．把握应用数组解决与数组有关的经常使用算法。

实例一、

用随机函数产生10个[10，50]的随机整数，并依照由小到大的顺序打印出来。

选择法排序算法：

（1）对有n个数的序列（寄存在数组a（n）中），从当选出最小的数，与第一个数互换位置。

（2）除第一个数外，其余n-1个数当选最小的数，与第二个数互换位置。

（3）依次类推，选择了n-1次后，那个数列已按升序排列。

程序运行界面

实例二、打印杨辉三角形（杨辉三角形为一个下三角矩阵，每一行第一个和主对角线上元素都为1，其余每一个数正好等于它上面一行的同一列与前一列数之和）。

算法设计：

概念一个二维数组A，数组中每一行第一个元素a（i,1）=1，主对角线上元素a（i,i）=1，其余元素a（i,j）=a（i-1,j-1）+a（i-1,j）。

打印杨辉三角形

第一题

输入系列字符串，按递减顺序排列输出到图片框中。

程序运行后窗体界面如图1所示。

要求：

（1）每输入一个字符串，按回车键后即把该字符串寄存到数组中；

（2）单击“排序”命令按钮，字符数组“递减”排序，并在图片框中打印输出。

图1程序运行界面

提示：

概念窗体级字符型数组s和整型变量n（表示输入字符串的个数）。

即在通用声明段声明如下：

Dimn%,s（100）AsString。

第二题

数组A中的元素由小到大顺序排列，输入一数据x，将其插入到数组A中，使其插入后数组仍然有序。

提示：

（1）在Form_Load事件中产生n个有序数（可把数组概念得适当大一些或用动态数组）。

（2）可由Inputbox函数输入要插入数x。

（3）把一个数插入到有序数列中去的算法思想是：

①第一确信x插在数组中的位置P，可由以下语句实现：

p=1

dowhilex>a（p）andp<=n

p=p+1

loop

②a（p）～a（n）元素向后顺移一个位置以空出a（p）元素放入x，可由以下语句实现：

fori=ntop-1step-1

a（i+1）=a（i）

nexti

a（p）=x

第三题

编一程序打印一个5行5列的数字方阵，使两对角线上元素均为0，其余均为1。

要求打印的数字方阵两列数字之间空3格，两行之间空一行

第四题

编程实现矩阵转置（将矩阵的行列转换），程序界面自定。

例如：

第五题

编一程序，用随机函数产生20个两位数的整数，存于4行5列的二维数组中，并求出其中的最大元素及它的行、列坐标，将数组按行（矩阵形式）输出到窗体，最大元素及行、列下标输出在数组的下方。

第六题

用随机函数产生50个10～100之间的互不相同的整数，存于一数组中，并以每行10个数打印输出到窗体上。

实验六，函数进程与子进程，实验目的

1．把握函数进程及子进程的概念方式。

2．把握函数进程及子进程的形参与实参的对应关系。

3．把握“值传递”和“地址传递”的传递方式。

4．把握标准模块的利用，明白得标准模块和窗体模块的区别。

5．了解递归概念和利用方式。

6．熟悉程序设计中的经常使用算法。

实例一、插入排序问题。

在一个有序的数组中，插入一个数后，仍然有序。

设计程序界面如图1所示，在“输入数”文本框（txtInput）内输入一个数，按回车键后，所输入的数马上显示在“插入数序列”图形框（picData）中，并存入数组a中，使数组a始终维持由大到小的顺序，在“输出结果”图形框（picResult）中输出数组a中的元素。

图1插入排序程序运行界面

算法思想：

此题设计一个插入排序进程Sort（），把该数插入到一个有序数组a中，插入后始终维持有序。

实例二、设计一个删除子串的函数进程Delstr（s1,s2），其功能是将字符串s1中显现的s2子字符串删去。

算法设计：

（1）第一在s1中找s2的子串，可利用Instr（）函数，要考虑到s1中可能存在多个或不存在s2字符串，用Dowhileinstr（s1,s2）>0循环结构实现。

（2）假设在s1中找到s2字符串，第一要确信s1字符串的长度，因s1字符串在进行多次删除时，长度在转变；然后通过left$（）、right（）函数的挪用删除s1中存在的s2字符串。

2．窗体上放置3个标签框控件和3个文本框控件，程序运行后窗体界面如图1所示。

图1删除子字符串

第一题

编写一个计算表达式

值的程序（m>=n>=0），要求：

用输入对话框输入m和n的值，用编写函数Functionfact（xasInterger）求x!

的值。

第二题

从键盘输入10个整数，输出其中的最大数和平均值，并将这10个数从小到大排序输出。

要求别离在窗体模块中和标准模块中编写子进程Maxnum、Avenum和ordernum来求最大数、平均值和排序，然后在命令按钮中挪用这些函数。

界面自行设计。

第三题

在标准模块中编写一函数进程，判定一个正整数N是不是为素数，假设是返回True，不然返回False。

并在窗体的单击事件中挪用此函数验证哥德巴赫猜想，即任何一个大于6的偶数，都可分解为两个素数之和。

如：

6=3+3；8=3+5。

将结果输出在窗体上。

第四题

编写一函数Maxlength（s），在给定的字符串s中，找出最长的单词。

程序界面自定。

提示：

找最长的单词，第一要从字符串中分离出单词，有多种方式：

最原始的是从字符串中逐个字符判定，假设为空格，那么前面的子串是单词；也能够通过Instr函数找第一个显现的空格，那么空格左侧的是单词；在VB中更方便的方式是利用Split函数，将单词一一分离到数组中。

第五题

．编程序求表达式s=x/2!

+x^3/4!

+…+x^（2n-1）/（2n）!

的值，并在窗体上输出。

要求如下：

（1）变量x与n的值在窗体单击事件顶用InputBox（）函数输入，通过挪用函数进程s实现题目要求。

（2）求表达式的值用函数进程Functionfs（n%,x!

）AsSingle完成。

第六题

在标准模块中编写一个将一维数组倒置寄存的子进程，并在窗体模块中编写相应的事件代码，来调试所编写进程的正确性。

程序界面自定。

实验七，变量与进程的作用域，实验目的

1．明白得进程级、模块级和全局级变量的有效范围。

2．明白得进程的作用范围。

3．明白得静态变量的概念及变量的生存期。

实例一、设计一个程序界面如图1和图2所示，有两个窗体的应用程序。

用户在Form窗体（输入窗体）的“请输入排序数个数”文本框输入有效数，按回车键后，在该窗体的“Picture1”图片框中输出排序前的数，单击“排序”按钮，启动Form2窗体，挪用冒泡排序子进程Sort并把排序结果在Form2（输出结果）窗体的“Picture1”图片框中输出，在Form2（输出结果）窗体的“请输入要查找的数”文本框内输入要查找的数后，单击“查找”按钮，挪用二分查找函数进程（Search），查找结果在“输出结果”文本框显示（显示该数组中的下标位置，找不到值为-1），单击“终止”按钮终止应用程序的运行。

要求在标准模块中编写：

（1）冒泡法排序子进程（sort），对已知的假设干个整数按递增顺序排列。

（2）二分法查找函数进程（search），查找某数，找到返回该数在数组中的下标位置，找不到值为-1。

图1程序输入窗体

图2程序输出窗体

二分查找（折半查找）法只能对有序数列进行查找，其大体思想是：

n个有序数寄存在数组a

（1）～a（n）中，要查找的数为x。

变量top、bot、mid别离表示查找范围的顶部、底部和中间，mid=（top+bot）/2，假设：

（1）x=a（mid），那么已找到退出，不然进行下面的判定。

（2）x

（3）x>a（mid），x必然落在mid+1和bot的范围之内，即top=mid+1。

（4）在确信了新的查找范围后，重复进行以上比较，直到找到或bot<