VB有趣的练习题

我这里有题目的实例和部分题目的参考答案，要的话给我邮箱，我发给你

第一次作业：

1）创建工程，实现下列要求(见第一次作业示例1)

Ø 在窗体中加载一幅图片(图片任选)

Ø 在窗体上画一个标签和两个按钮，并对按钮事件编成，完成相应的功能

Ø 对窗体事件进行编成，单击窗体时，文字消失，双击窗体时，文字出现

第二次作业：

(1) 在名称为Form1的窗体上画两个标签（名称分别为Label1和Label2，标题分别为“身高”和“体重”）、两个文本框（名称分别为Text1和Text2，Text属性均为空白）和一个命令按钮（名称为Command1，标题为“输入” ）。然后编写命令按钮的Click事件过程，程序运行后，如果单击命令按钮，则先后显示两个输入对话框，在两个输入对话框中分别输入身高和体重，并分别在两个文本框中显示出来，如果输入的数字非法，则显示提示信息。运行后的窗体如图所示。要求程序中不得使用任何变量。(见第二次作业示例)

*注意：

存盘时，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。

第三次作业：

(1) 在名称为Form1的窗体上画四个文本框和一个按钮；程序运行后，在四个文本框中各输入一个整数，然后单击命令按钮，即可求最大值，并在窗体上显示出来，如果输入的数值非法，显示提示信息（如图所示）。(见第三次作业示例1)

*注意：

存盘时，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。

（2）编程实现统计1到某大于10的整数之间能被3或7整除的数的个数。

在窗体上画两个文本框和一个命令按钮。第一个文本框用来输入一个大于10的整数，点击命令按钮，完成统计，统计的结果显示在第二个文本框中。如下图。程序运行情况(见第三次作业示例2)

第四次作业：

(1)利用随机函数Rnd()生成25个50～200之间的正整数,赋给一个5行5列的数组的每个元素,并找出最大元素的位置,在窗体中用Print语句显示数组元素的行列,并且显示最大元素及所有的位置.(见第四次作业示例)

(2）课本124页第6题(运行情况见第四次作业示例2)

第五次作业

1） 编程实现：数组生成，数组排序，数组元素添加，数组元素删除(运行情况见第五次作业示例1)

要求：1.生成的数组元素个数为8～12个，元素为整型数据，元素值在10～99之间

2.添加的元素和删除的元素通过输入框输入

2）在窗体上画两个命令按钮（其名称分别为Command1和Command2，标题分别为“添加项目”和“删除项目”），再画一个列表框（名称为List1）和一个文本框（名称为Text1），如图1所示。编写适当的事件过程。程序运行后，如果单击“添加项目”命令按钮，则将文本框Text1的内容添加到列表框中的项目（内容任意）；如果单击“删除项目”命令按钮，则从列表框中删除和文本框Text1内容相等的项目。程序的运行情况如图2所示。(见第五次作业示例2)

图1 图2

第六次作业

(1)在名称为Form1的窗体上画一个文本框（名称为Text1，Text属性为“国”，FontName属性为“黑体”）和一个水平滚动条（名称为HScroll1），如图1所示。在属性窗口中对滚动条设置如下属性：

Min 10

Max 100

LargeChange 5

SmallChange 2

编写适当的事件过程。程序运行后，如果移动滚动条上的滚动框，则可扩大或缩小文本框中的“国”字。运行后的窗体如图2所示。要求程序中不得使用任何变量。

*注意：工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。

图1 图2

(2)编写一考试计时程序，要求输入考试时间（分钟）后，点击开始考试，可以显示当前时间和剩余时间(见第六次作业示例2)

第七次作业

（1）在名称为Form1的窗体上有两个单选按钮，名称分别为Opt1和Opt2，标题分别为100-200之间素数和200-400之间素数，一个文本框，名称为Text1，和两个命令按钮，其名称分别为Cmd1和Cmd2，标题分别为计算和存盘，如图所示。程序运行后，如果选中一个单选按钮并单击计算按钮，则计算出该单选按钮标题所指明的所有素数之和。并在文本框中显示出来。如果单击存盘按钮，则把计算结果存入out.txt文件中，该文件必须和程序放在同一文件夹中。

要求：编写isprime(x as integer)函数可以判断整数x是否为素数，如果是素数，则函数返回True，否则返回False，利用该函数，完成100-200之间素数或200-400之间素数的求和

第八次作业

（1）在窗体上建立四级菜单（名称分别为Read、Calc、Save和clear，标题分别为“读入数据”、“计算并输出”、“存盘”和清“空文本框”），然后画一个文本框（名称为Text1，MultiLine属性设置为True，ScrollBars属性设置为2）（如图所示）。程序运行后，如果执行“读入数据”命令，则读入datain1.txt文件中的100个整数，放入一个数组中(数组的下界为1),并将所有整数在文本框中显示出来；如果单击“计算并输出”按钮，则把该数组中下标为奇数的元素在文本框中显示出来，求出它们的和，并把所求得的和在窗体上显示出来；如果单击“存盘”按钮，则把所求得的和存入考生文件夹下的dataout.txt文件中。

版权声明：本站所有文章皆为原创，欢迎转载或转发，请保留网站地址和作者信息。

很赞哦！ ()