VB上机实验题.docx

VB上机实验题.docx

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

VB上机实验题

实验一

第一题

编一程序，程序运行的初始界面，如图1-15所示，当用户在文本框输入姓名，例如输入"张三"，单击"确定"按钮，则程序的运行情况如图1-16所示，如果单击"结束"按钮，即结束程序运行。

图1-15程序运行后初始界面图1-16单击"确定"按钮后的程序界面

第二题：

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

"，同时窗体上出现两个命令按钮"继续"和"结束"，如图2所示，如果单击"继续"按钮，则又回到初始运行状态；单击"结束"按钮即结束程序运行。

图1程序运行后初始界面

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

实验二

1、创建如图所示界面（含一个标签Label1，两个文本框Text1和Text2，两个按钮Command1和Command2）。

要求：

在文本框Text1中输入内容，文本框Text2的内容同步改变；若文本框Text2的内容改变，则标签的标题也同步变化；单击“清空”按钮，可以清空两个文本框中的内容，同时将文本框Text1设置为当前对象；单击“结束”按钮可以结束程序。

2、创建如图所示界面：

要求：

在列表框LIST1中选中一项后，单击按钮“>”可以将此项移到LIST2中，单击按钮“>>”可以将LIST1中的所有项目移到LIST2中；另两个按钮的功能与此相反。

3、创建如图所示界面：

在文本框中输入内容后单击“确定”按钮，可以将内容添加到列表框中；双击列表框中的某一项，可以将此列表项移到组合框中；单击“清空”按钮可以清除文本框、列表框与组合框中的内容，并且将焦点设置在文本框上；单击“退出”按钮可以结束程序的运行。

实验三

1、完成一个函数计算器（实验3-1）；

2、已知函数

，试设计一个界面，输入变量x、y、z的值，计算得到函数的值，界面参考如图所示；

3、字符串S=”xyzanfh123ancrimf”，请将字符串中的“123”替换成“ABC”，界面参考如图所示；

4、输入一个整数n（2~6之间），然后随机生成一个n位整数，界面参考如图所示；

5、输入一个两位正整数，交换个位数与十位数后再输出。

实验四

1、界面如图，在文本框Text1中输入一个三位正整数，单击“判断”按钮，结果如图所示，如果此数是一个水仙花数，则显示“XXX是水仙花数”，否则显示“XXX不是水仙花数”。

“清空”按钮可以清空文本框中的内容，并且焦点设置在Text1上。

水仙花数满足这样的条件：

各个数位上数字的立方和等于该数本身。

如：

153=13+53+33。

2、完成实验指导书中的实验4-1到实验4-4。

3、找出1000以内所有的同构数。

实验五

1、完成实验4-6；

2、完成实验4-7；

3、求两个自然数的最大公约数与最小公倍数，参考界面如图所示。

4、编写一段加密代码以实现对四位数字的加密。

加密的过程如下：

输入一个四位整数，将每位替换成该位与7的和对10的余数，然后将第一位与第三位数字位置互换，第二位与第四位位置互换，最后显示加密后的数字。

界面参考如图：

5、编写程序求一个字符串中的最长单词。

假设字符串中只有字母与空格，单词之间用空格分隔。

实验六

1、百钱百鸡问题。

公鸡三元一只，母鸡两元一只，小鸡一元三只，一百块钱买了一百只鸡，请问公鸡、母鸡、小鸡各买多少只？

2、计算圆周率π，计算精度到第n项减1的绝对值小于10-5为止。

3、生成一个四行五列的两位随机整数的数组，分别输出到图片框与多行文本框中。

4、编程生成如下几个矩阵。

实验七

1、随机生成一个一维数组（十个元素），要求其中的数为递增的。

如：

11、23、37、43、43、50……。

2、随机生成一个两两位整数的二维数组，输入一个待查找的数，找出其位置，并显示，如果找不到，则输出“未找到！

”。

界面如图所示，请完成相关按钮的功能。

3、找出二维数组中的最大值与最小值及其位置，界面自行设计。

4、鞍点问题：

实验5-4。

5、随机产生10个数，寻找能被3整除的最大数，如果没有，则显示“无相关的数！

”。

界面自行设计。

实验八

1、实验5-3：

冒泡排序。

2、合并排序。

已知数组A与B均按升序排列，现将A与B数组合并成一个新的数组C，要求数组C中的元素也是按升序排列。

（数组A与B的个数自己定）

3、求一个N*N阶的矩阵A的转置矩阵。

4、实验5-6：

找指定数对。

实验九

1、插入法排序。

2、找出5000以内的所有亲密对数。

所谓亲密对数就是指两个数A与B，其中A的因子和等于B，B的因子和等于A。

3、实验书P.80，第5、6题。

实验十

1、找出100以内所有素数添加到列表框中。

程序中至少定义一个用于判断素数的自定义函数。

2、找出所有水仙花数。

程序中至少定义一个用于判断三位整数是否是水仙花数的自定义函数。

3、编写程序，生成n组22选5的彩票号码组（每组由各不相同的5个数组成，且每个数只能取1~22之间的数字）。

要求：

至少包含一个通用过程。

工程文件保存为P2.VBP，窗体文件保存为：

F2.VBP。

4、编写一个数据转换程序，将一组大小差异很大的数据变换为[0，1]区间的数值。

设这样本数据的最大值为maxa，最小值为mina，将第k个样本值vk变换为vk’的变换公式为：

生成样本数据：

利用InputBox函数输入需要生成的数据个数n，缺省值为10，再生成n个1-999之间的随机整数，并在文本框中显示。

【要求】1、程序参考界面如下图所示，不得增加或减少界面对象或改变对象和种类；

2、程序中至少包含一个通用过程；

3、窗体文件与工程文件分别保存为F2.frm与P2.vbp。

实验十一

1、验证哥德巴赫猜想：

任何一个大于等于4的偶数，都可以拆分为两个素数之和。

2、找出所有由四个不同数字组成的素数。

3、编写程序求出所有无重复的三个整数组合，使它们的最小公倍数等于指定数据N（设N取值范围为[100，150]，三个整数的范围为[3，40]）。

【要求】1）、程序参考界面如下图所示，不得增加或减少界面对象或改变对象和种类；

2）、程序中至少定义一个名为Lcm的函数过程用于求三个整数的最小公倍数；

3）、点击“清除”按钮可以清除文本框与列表框中的内容，且焦点设置在文本框上；

4、编程找出10000以内所有的回文数的平方仍是回文数的数。

所谓回文数是指左右数字完全对称的自然数，例如：

11，121，1221等都是回文数。

【编程要求】

1）程序参考界面如图所示，编程时不得增加或减少界面对象或改变对象的种类，但界面元素的大小、位置可随意设置。

2）单击“生成数据”按钮，应将10000以内所有的回文数的平方仍是回文数的数，按图中示意形式存放在列表框List1中。

3）单击“返回”按钮，结束程序运行。

4）程序中定义一个判断回文数的函数过程。

实验十二

1、【题目】

编写程序，生成一个由两位随机整数组成的5×5的数组，并显示在图片框中；再找出该数组的最小元素，并将最小元素所在列删除（将最小元素所在列之后的各列依次前移）；将5×5的数组重定义为一个5×4的数组，显示在另一个图片框中。

【编程要求】

1）程序参考界面如图所示，编程时不得增加或减少界面对象或改变对象的种类，窗体及界面元素大小适中，且均可见。

2）按“生成数组”按钮，则将生成的数组显示在图片框中；按“删除列”按钮，则将最小元素所在的列删除后的新数组显示在图片框中。

3）在程序中定义一个实现查找最小元素及删除列的通用子过程。

2、【题目】

A数组是由随机生成的且均为两位数的元素构成的6×6二维数组，在每一列中选出一个最小数，然后在所选的6个数中挑出最大的一个数，叫做“小数中的最大数”；在每一行中选出一个最大数，然后在所选的6个数中挑出最小的一个，叫做“大数中的最小数”。

在文本框中分别显示这两个数。

【编程要求】

1）程序参考界面如下图所示，编程时不得增加或减少界面对象的种类，窗体及界面元素大小适中，且均可见。

2）按“开始”按钮，则生成数组，并将数组元素按行显示在图片框中，调用子程序进行“选数”处理（如图所示）；按“清除”按钮，，则将图片框和两个文本框清空；按“结束”按钮，则结束程序运行。

3）在程序中分别定义两个求矩阵每行中的最小数和最大数函数过程。

3、【题目】

找出所有三位数的幸运数对。

所谓幸运数对是指差为3，且每个数的各位数字之和都能被6整除的一对数。

例如189，192就是一对幸运数。

【编程要求】

1）程序参考界面如右图所示，变成时不得增加或减少界面对象或改变对象的种类，窗体及界面元素大小适中，且均可见。

2）按“查找幸运数”按钮，则运行程序，生成并显示幸运数对；按“清除列表框”按钮，则将列表框清空；按“结束”按钮，则结束程序运行。

3）在程序中定义一个生成幸运数对的通用过程。

实验十三

1、编写模拟翻硬币的程序。

设硬币画面为1，字面为0。

10个硬币画面向上围成一圈，按顺时针方向数硬币，凡数到可被3或被7整除的数时，则将该硬币翻转。

从1数到指定的次数，显示这些硬币的状态。

【编程要求】

1）程序参考界面如图所示，编程时不得增加或减少界面对象或改变对象的种类，窗体及界面元素大小适中，且均可见。

2）按“翻转硬币”按钮，则将初值显示在“初始状态”文本框中，并按题目要求进行硬币翻转处理，从1数到输入到“次数”文本框中的数字，再将结果显示在“当前状态”文本框中。

3）按“清除”按钮，则将三个文本框清空，并将焦点设在“次数”文本框上；按“结束”按钮，则结束程序运行。

4）程序中至少要包含一个通用过程。

2、教材P.176，第17、18题。