【VB开源代码栏目提醒】：网学会员为需要VB开源代码的朋友们搜集整理了VBNET环境和程序设计 - 计算机教材相关资料，希望对各位网友有所帮助!
实验一
VB.NET环境和程序设计一、实验目的 1. 掌握启动与退出
VB.NET的方法。
2. 掌握建立、编辑和运行一个简单的
VB.
NET应用程序的全过程。
3. 掌握利用
常用控件创建基于图形用户界面应用程序的技术。
4. 掌握
VB.NET程序设计语言的语法规则和编程技术。
二、实验内容 1基本控件标签、文本框、按钮的使用。
利用文本框的字号、内容和格式等属性来实现格式设置并对选中的复制练习效果见图1.1。
在TextBox1输入一字符串建立三个命令按钮 1Button1Text内容为“隶书 25磅”事件过程
代码为 TextBox1.Font New Font隶书 25 2Button2Text内容为“幼圆 15磅”
代码类似。
3Button3Text内容为“复制 ”要求复制在TextBox1选中的内容以及其字体格式。
选中的内容通过TextBox1的.SelectedText属性字体通过Font直接赋值。
图1.1 实验1.1运行界面 2. 输入数据合法性检验、MsgBox对话框的使用。
利用计算机解决古代数学问题“鸡兔同笼
问题”。
即已知在同一笼子里有总数为m只鸡和兔鸡和兔的总脚数为n只求鸡和兔各有多少只 提示鸡、兔的只数通过已知输入的mn列出方程可解但不要求出荒唐的解例3.5只鸡、4.5只兔或者求得的只数为负数。
因此在TextBox2_LostFocus事件中要考虑下面两个条件 1对输入的总脚数n必须是偶数否则提示数据错的原因重新输入数据 2若求出的头数为负数提示数据错的原因重新输入数据。
图1.2 实验1.2运行界面 此处用到If语句请参考该语句的用法。
3.利用
计算机解决初等数学问题。
输入一元二次方程02cbxax的系数cba计算并输出一元二次方程的两个根xx12。
界面如图1.3所示。
提示 1在
VB.NET中 Sqrt自变量出现函数时显示“无效的过程调用或参数”的出错显示原因是sqr函数调用时自变量出现负数是无法执行的例调用Sqr-3会产生错误。
2求根时要对a、b、c三个系数分别考虑多种情况的处理即重根、两个实根、两个复根等。
4. 数组的使用。
随机产生10个30100包括30100的正整数求最大值、最小值、平均值并显示整个数组的值和结果如图2.1.4所示。
图1.4 实验1.4运行界面 5. 结构类型及数组的使用。
自定义一个职工结构类型包含职工号、姓名、工资。
在通用声明段声明一个职工类型的数组可存放5个职工窗体中
设计3个文本框、2个命令按钮和4个标签控件文本框分别输入职工号、姓名、工资当单击“添加”命令按钮将文本框输入的内容添加到数组的当前元素中当单击“排序”命令按钮将输入的内容按工资递减的顺序排序并在图形框显示。
程序运行界面见图1.5。
提示 1自定义一个职工类型只能在标准模块内定义若在窗体通用声明段定义必须为Private。
2为了保存当前输入职工元素的个数该变量应在通用声明段声明若在事件过程中声明每次运行将被初始化为0。
图1.3 实验1.3运行界面 图1.5 实验1.5运行界面 6. 自定义函数。
编一函数过程IsHn对于已知正整数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”找到后以高亮度显示。
若再选择“查找下一个”则继续查找。
图1.10 实验1.9 文本文件应用
相关文章
2013-9-15
