Visual Basic实验(1302)

《Visual Basic实验(1302)》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、学院专业(班级)姓名学号任课教师86目录实验一VisualBasic编程环境和控件1实验二窗体及基本控件使用7实验三顺序结构程序设计13实验四选择结构程序设计18实验五选择结构程序设计（续）22实验六循环结构程序设计28实验七循环结构程序设计（续）33实验八常用控件37实验九常用控件（续）42实验十数组46实验十一数组（续）52实验十二顺序文件57实验十三过程62实验十四过程（续）66实验十五菜单及通用对话框71实验十六随机文件（选作）75附录:VB统考编程题（精选）79期末自测题（A卷）89期末自测题（B卷）9486实验

2、报告的整理与编写上机实验结束后，编写实验报告是软件工程的要求，也是培养科学作风的重要途径，实验报告的主要内容包括：（1）实验目的实验作为教学的一个重要环节，其目的在于更深入地理解和掌握课程教学中的有关基本概念，应用基本技术解决实际问题，从而进一步提高分析问题和解决问题的能力。因此，当我们着手做一个实验的时候，必须明确实验的目的，以保证达到课程所指定的基本要求。在写实验报告时，要进一步确认是否达到了预期的目的。（2）实验内容实验的目的是要通过解决一些具体问题来达到的。在书中，每一部分都安排了多个实验题目，根据教学安排、进度、

3、实验条件、可提供的机时、学生的基础等因素，可以选择其中的几个或全部。因此，在实验报告中，实验内容是指本次实验中实际完成的内容。在每一个实验题目中，一般都提出一些具体要求，其中有些具体要求是为了达到实验目的而提出的，不仅有具体的实验题目，还应包括具体要求。（3）程序设计说明包括算法设计思路，必要的流程图，界面设计说明、使用模块及变量的说明等。（4）源程序代码VisualBasic的源程序包括界面设计和代码。程序设计的产品是程序，它应与算法或流程图相一致，要与用户界面设计一致。程序要有具有易读性，符合结构化原则。（5）程序的运

4、行结果（包括对不同测试数据的运行结果）程序运行结果一般是输出语句所输出的结果。对于不同的输入，其输出的结果是不同的。因此，在输出结果之前一般还应注明输入的数据，以便对输出结果进行分析和比较。在程序的运行中，还必须用各种不同情况的数据进行调试，以检查程序能否正常运行。因为，有时程序对某些情况是可以正常运行的，而对某些特殊情况的数据可能会出现运行出错或死机，通过各种数据的调试，尽量做到程序不会出问题。（6）实验体会分析和体会实验中碰到的问题及解决方法,这是实验报告中最重要的一项，也是最容易忽视的一项。实验过程中大量的工作是程序

5、调试，在调试过程中会遇到各种各样的问题，每解决一个问题就能积累一点经验，提高自己的编程能力。因此，对实验的总结，最主要的是程序调试经验的总结。调试分析也包括对结果的分析。体会主要是指通过本次实验是否达到了实验目的，有哪些基本概念得到了澄清，碰到了那些以前没有见到的问题，最后采用什么方法得到解决等。86实验日期年月日实验一VisualBasic编程环境和控件一、实验目的1、掌握启动与退出VisualBasic的方法。2、掌握VisualBasic语言程序的开发环境.3、掌握VisualBasic语言程序设计的方法与特点4、掌

6、握建立、编辑、运行和保存一个简单的VisualBasic应用程序的全过程。二、实验内容申请一个免费邮箱(如果已经有邮箱，请跳过)，以便以后将每星期编制的程序压缩并存放在邮箱中（或者保存在U盘中），以便复习时用。1.创建第一个应用程序。编写一个简单程序，实现单击命令按钮时在文本框显示“单击命令按钮”，单击窗体空白处时在文本框显示“单击窗体”。保存窗体文件名：SY1_1.frm,保存工程名：SY1_1.vbp。程序界面如图11.所示。图1.1实验1的运行界面【步骤】①启动VisualBasic6.0，在弹出的“新建工程”对话框

7、中选择“标准EXE”。②在窗体上建立一个文本框和一个命令按钮。建立方法：在左边工具箱上，单击要绘制的控件的按钮，再把鼠标移到窗体，按住鼠标左键画出所需大小的框体。或者是双击工具箱的要绘制的控件的按钮。③分别选中命令按钮和文本框，在属性窗口中对各属性进行设置，属性设置参照表：表1.1实验1属性设置对象名称属性属性值Form1(窗体)Caption我的第一个程序Text1(文本框)Text（空）Command1(命令按钮)Caption命令按钮④双击命令按钮，进入代码窗口中命令按钮的默认事件，编写代码如下：86PrivateS

8、ubCommand1_Click()Text1.Text="单击命令按钮"EndSub①双击窗体的空白处，进入代码窗口中窗体的默认事件(Form_Load())，在右边的过程列表框中选择Click，，编写代码如下：PrivateSubForm_Click()Text1.Text="单击窗体"EndSub