试验一VBNET初步.DOCVIP

实验一 VB.NET环境和程序设计 一、实验目的 1. 掌握启动与退出VB.NET的方法。 2. 掌握建立、编辑和运行一个简单的VB.NET应用程序的全过程。 3. 掌握利用常用控件创建基于图形用户界面应用程序的技术。 4. 掌握VB.NET程序设计语言的语法规则和编程技术。 二、实验内容 1．基本控件标签、文本框、按钮的使用。 利用文本框的字号、内容和格式等属性来实现格式设置，并对选中的复制练习，效果见图1.1。在TextBox1输入一字符串，建立三个命令按钮： （1）Button1：Text内容为“隶书 25磅”，事件过程代码为： TextBox1.Font = New Font(隶书, 25) （2）Button2：Text内容为“幼圆 15磅”，代码类似。 （3）Button3：Text内容为“复制 =”，要求复制在TextBox1选中的内容以及其字体格式。选中的内容通过TextBox1的.SelectedText属性；字体通过Font直接赋值。 图1.1 实验1.1运行界面 2. 输入数据合法性检验、MsgBox对话框的使用。 利用计算机解决古代数学问题“鸡兔同笼问题”。即已知在同一笼子里有总数为m只鸡和兔，鸡和兔的总脚数为n只，求鸡和兔各有多少只？ 提示：鸡、兔的只数通过已知输入的m，n列出方程可解，但不要求出荒唐的解（例3.5只鸡、4.5只兔，或者求得的只数为负数）。因此，在TextBox2_LostFocus事件中要考虑下面两个条件： （1）对输入的总脚数n必须是偶数，否则提示数据错的原因，重新输入数据； （2）若求出的头数为负数，提示数据错的原因，重新输入数据。 图1.2 实验1.2运行界面 此处用到If语句，请参考该语句的用法。 3.利用计算机解决初等数学问题。 图1.3 实验1.3运行界面 输入一元二次方程的系数，计算并输出一元二次方程的两个根。界面如图1.3所示。 提示： （1）在VB.NET中， Sqrt自变量出现函数时，显示“无效的过程调用或参数”的出错显示，原因是sqr函数调用时，自变量出现负数是无法执行的，例调用Sqr(-3)会产生错误。 （2）求根时要对a、b、c三个系数分别考虑多种情况的处理，即：重根、两个实根、两个复根等。 4. 数组的使用。随机产生10个30~100(包括30，100)的正整数，求最大值、最小值、平均值，并显示整个数组的值和结果，如图2.1.4所示。 图1.4 实验1.4运行界面 5. 结构类型及数组的使用。自定义一个职工结构类型，包含职工号、姓名、工资。在通用声明段声明一个职工类型的数组，可存放5个职工；窗体中设计3个文本框、2个命令按钮和4个标签控件，文本框分别输入职工号、姓名、工资；当单击“添加”命令按钮，将文本框输入的内容添加到数组的当前元素中；当单击“排序”命令按钮，将输入的内容按工资递减的顺序排序，并在图形框显示。程序运行界面见图1.5。 提示： （1）自定义一个职工类型只能在标准模块内定义，若在窗体通用声明段定义，必须为Private。 （2）为了保存当前输入职工元素的个数，该变量应在通用声明段声明，若在事件过程中声明，每次运行将被初始化为0。 图1.5 实验1.5运行界面 6. 自定义函数。编一函数过程IsH(n)，对于已知正整数n，判断该数是否是回文数，函数的返回值类型为布尔型。主调程序每输入一个数，调用IsH函数过程，然后在图形框显示输入的数，对于是回文数显示一个“★”，见图1.6。 图1.6 实验1.6回文数程序运行界面 提示： (1) 所谓回文数是指顺读与倒读数字相同，即指最高位与最低位相同，次高位与次低位相同，依次类推。当只有一位数时，也认为是回文数。 (2) 回文数的求法，只要对输入的数(按字符串类型处理)，利用MID函数从两边往中间比较，若不相同，就不是回文数。 7．单选、复选、框架、列表框的使用。设计如实验图1.7所示的应用程序。当用户选定了基本配置并且单击“确定”按钮后，在右边的列表框中显示所选择的信息。 实验图1.7 计算机配置选择程序 8．两个窗体的使用。设计一个如实验图1.8所示的程序。它对窗体中的列表框具有随机产生数据、删除、添加、统计的功能；统计结果显示在如实验图1.9所示的窗体中。 实验图1.8 主窗体 实验图1.9 统计结果显示窗体 9．通用对话框、文件的使用。设计一个如图1.10所示的应用程序。 要求： （1）选择“打开文件”弹出一个通用对话框，选择文件后显示在文本框中； （2）选择“保存文件”后弹出通用对话框，确定文件名后保存； （3）选择“查找下一个”就在文本文件中查找单词“.NET”，找到后以高