第二课体验VB编程

北仑中学算法与程序设计自编教材第二课体验VB编程一、VisualBasic编程界面VisualBasic是一个程序设计的工具，只要我们将自己的想法（算法）用VB语言在VB程序设计环境下编成程序，那么计算机就能实现我们所想的功能。先来认识一下VB的编程环境，依次选择“开始”菜单——“程序”——“MicrosoftVisualbasic6.0中文版”——“MicrosoftVisualbasic6.0中文版”即可启动VB，选择“标准EXE”，点“打开”按钮，就可以开始编写一个简单的VB程序了。界面如下图1：（图1：VisualBasic界面）界面介绍：1、窗体对象：你的设计舞台，初始时是空白的，由程序设计者往里面添加对象、编写代码2、控件工具箱：提供了用于开发VB应用程序的各种控件，鼠标移动到控件上时，会提示该控件的名称，双击某个控件，就能将该控件添加到窗体的中间（控件添加到窗体后就是一个实际的对象了），然后可以用鼠标调整该对象在窗体中的位置。3、属性窗口：显示被选中对象的所有属性，如图，当前选中的是窗体对象，它有名称属性、Caption属性等等，其中名称属性值为Form1,Caption属性值为“求圆面积”。4、工程资源管理器：显示所编写程序中的所有资源，包括窗体、模块、控件等等，当然我们课堂中编写的都是小程序，一般来说一个工程中就只有一个窗体文件。二、VB编程实战训练编写一个VB应用程序一般要经过三个步骤：设计界面——设置属性——编写代码例1窗体对象控件工具箱属性窗口工程资源管理器北仑中学算法与程序设计自编教材设计一个求圆面积的程序，功能：在程序运行时，输入圆的半径，按“计算”按钮，则立即计算出圆的面积。界面如图2（图2求圆面积程序的界面）编写这个程序的过程，先打开：（1）设计界面：二个标签（Label）对象、二个文本框（textbox）对象、一个命令按钮（commandbutton）对象。添加这些对象的方法：在控件工具箱中选择相应控件，然后用鼠标在窗体对象的恰当位置左键点拖就可以了。标签：一般用于显示说明、提示信息，常用的属性为caption。文本框：用于接收用户输入信息或显示信息，常用的属性为text，文本框动态显示该对象的text属性的值，对显示内容的改变就是对文本框对象的text属性的值的改变。命令按钮：一般用于响应用户的鼠标点击事件，如用户对按钮的鼠标单击事件编写程序后，按钮在程序运行时就能对用户的鼠标单击有相应的响应。常用属性caption。（2）修改属性：每个对象都有很多的属性，为了适合我们的程序，需要修改对象的某些属性的值，要求如下表：对象名属性名属性值说明Form1Caption求圆面积窗体对象的标题Label1Caption请输入半径：用来提示后面文本框的功能Label2Caption面积是：用来提示后面文本框的功能Text1Text（空白）用于输入半径值Text2Text（空白）用于显示面积值Command1Caption计算计算面积，并显示到text2中Caption属性是对象的标题，一般可以理解为对象的外表，比如命令按钮这个对象，初始时它的名称和caption的值都是Commnad1，当caption属性值被修改成“计算”后，我们看到它的外表就是“计算”这两个字。同学们要注意区分对象的名称和Caption属性，以人为比喻，名称就是一个人的名字，而caption属性就是这个人穿的衣服。Text属性是文本框对象的内容，初始时text1这个对象的名称和text属性的值都是text1，当text属性值被改成删除后，可以看到text1对象的内容没有了。Text2Text1Label1Label2Command1北仑中学算法与程序设计自编教材（3）编写代码：完成上述2个步骤后，程序的样子已经有了，但是还不能实现求圆面积的功能。这个程序设想的是通过点击command1按钮，实现计算功能并显示答案，所以需要对command1的鼠标单击事件（click）编写代码，鼠标双击command1对象（注意：该对象的名称是command1，caption属性值是“计算”），出现如图3的窗口（图3对command1对象的click事件编程）在command1的click事件的过程中，代码需要完成从text1中获取输入的半径值——计算面积——把面积值显示在text2中这一系列动作。代码如下：r=val（text1.text）‘从text1中获取输入的半径值s=3.14*r*r‘计算圆面积text2.text=str(s)‘在text2中显示圆面积值代码解释：获取文本框text1中的内容：因输入半径的文本框名称为text1，内容属性是text，要获得它的内容的值可以用text1.text（一般以对象名称．属性的方式可获得对象的相关属性值），将它的内容赋值给r，即r=text1.text（注意“=”，它是将右边的值赋给左边的变量），又因为文本框里的内容是文本型，需要用val（）函数将它转换为数值型，便于计算，所以代码为r=val(text1.text)。计算圆面积：注意理解“=”号的赋值作用。在text2中显示圆面积值：圆面积值存放在变量s中，由于要显示到文本框中，可用str（）函数将s转变为文本类型，显示圆面积可以说成text2的内容为str（s），文本框内容由text属性值决定，因此代码为text2.text=str（s）（注意加下划线的两句话的对比，体验由算法写成代码的过程）（4）运行调试及生成EXE文件代码编写完成后，可以将代码窗口关掉，按F5运行程序，输入半径，测试程序的正确性，有错误就停止调试，修改程序，如果程序调试正确的话，就可以保存文件了。保存源文件：“文件”菜单——“保存Form1”生成可执行文件：“文件”菜单——“生成工程1.exe”事件对象代码写在这中间北仑中学算法与程序设计自编教材例2用海伦公式计算三角形面积，要求输入三角形的三条边长，点“计算”按钮后计算出面积，并显示。界面如图4:（图4海伦公式计算三角形面积的程序界面）1、界面设计可参考例1中的设计方法2、属性设置对象名属性名属性值说明Form1Caption海伦公式计算三角形面积窗体对象的标题Label1Captiona=用来提示后面文本框的功能Label2Captionb=用来提示后面文本框的功能Label3Captionc=用来提示后面文本框的功能Label4Caption三角形面积是：用来提示后面文本框的功能Text1Text（空白）用于输入边长Text2Text（空白）用于输入边长Text3Text（空白）用于输入边长Text4Text（空白）用于显示面积值Command1Caption计算计算面积，并显示到text4中3、编写代码由于程序是点击command1后计算并显示值，所以需要对command1的click事件编写代码：A=val(text1.text)B=val(text2.text)C=val(text3.text)P=(a+b+c)/2S=sqr(p*(p-a)*(p-b)*(p-c))Text4.text=str(s)Command1Label1Label2Label3Label4Text1Text2Text3Text4