资源描述
第2章VB编程入门,VisualBasic程序设计教程,VisualBasic程序设计教程,2,本章将介绍有关VB程序的构成和数据类型以及变量的定义和使用、表达式以及基本的输入输出操作。这些知识是编程的基础。我们将通过简单示例的分析，帮助理解如何进行VB编程。,VisualBasic程序设计教程,3,本章主要内容:确定数据的性质：数据类型两种数据表达：常量和变量算术运算符和表达式VB编程的开始：使用窗体赋值和输入输出,VisualBasic程序设计教程,4,所谓编程就是针对要解决的任务，设计解决问题的步骤，使用计算机程序设计语言进行描述，最后通过编码、测试、修改等过程实现编程的目的。编程有两个方面的要求:一需要理解编程的任务并给出算法二要使用特定的计算机语言具体地表示这些算法。,2.1概述,VisualBasic程序设计教程,5,1加法器界面设计,2.2一个简单的加法器程序,VisualBasic程序设计教程,6,2编写程序代码,VisualBasic程序设计教程,7,PrivateSubCmdAdd_Click()计算”按钮代码DimTempAsLongTxtNum1.Text=TxtNum2.Text=TxtSum.Text=TxtNum1.Text=InputBox(请输入第一个数)TxtNum2.Text=InputBox(请输入第二个数)Temp=Val(TxtNum1)+Val(TxtNum2)TxtSum.Text=TempEndSubPrivateSubCmdExit_Click()“退出”按钮代码FrmAdder1.HideMsgBox(加法器程序运行结束，谢谢使用)EndEndSub,VisualBasic程序设计教程,8,数据是程序处理的对象。为了更好地处理各种各样的数据，VB定义了多种数据类型，数据类型定义了值的范围并确定了它能够进行的操作。,2.3确定数据的性质：数据类型,VisualBasic程序设计教程,9,VisualBasic程序设计教程,10,使用数值类型,1.字节型(Byte)字节型数可以表示无符号的整数，02552.整型(Integer)和长整型(Long)不带小数部分的数，表示正整数、负整数和零整型数:-327683276798、98长整型数：-2147483648214748364745678、45678R,”面积”;Area,”周长”;Perimeter输出半径、面积。周长EndSub,VisualBasic程序设计教程,63,2.7.2使用输入对话框InputBox函数【例2-4】计算半径为R的圆面积和周长，半径值由键盘输入。PrivateSubForm_Click()ConstPI=3.141526DimRAsInteger,AreaAsSingle,PerimeterAsSingleR=Val(InputBox(请输入圆的半径：,输入)Area=PI*R*RPerimeter=2*PI*RPrint半径;R,面积;Area,周长;PerimeterEndSub这个例子中使用了InputBox函数产生输入对话框。,VisualBasic程序设计教程,64,1输入对话框的使用InputBox函数的使用格式如下：InputBox（提示，标题，默认值，xpos，ypox）它们的含义如下：（1）提示信息。这是InputBox对话框所必须的信息，也可以使用空文本，即“”。（2）标题。这是在对话框窗口标题栏显示的内容。可设置，也可以没有标题。,VisualBasic程序设计教程,65,（3）默认值。在输入框中的默认输入。系统默认为空，可选。（4）xpos和ypos为对话框的左侧与屏幕左边的距离和上边与屏幕顶部的距离值。可选。,VisualBasic程序设计教程,66,2在提示中使用多行文本如果提示信息比较多，可以使用ASCII控制符回车Chr（13）和换行符Chr（10）产生另起一行。例如：提示信息为“请输入圆的半径”+Chr（13）+Chr（10）+“使用正整数”，产生如图效果,VisualBasic程序设计教程,67,3使用转换函数InputBox函数接受的是文本，也就是字符型数据，在程序中根据变量类型不同，可以使用转换函数。如：R=Val(InputBox(请输入圆的半径：,输入)这里的Val就是转换函数，将文本类型的数据转换为整型数以便参加运算。VB提供了在不同类型数据之间的转换。,VisualBasic程序设计教程,68,2.7.3使用Print方法输出数据使用Print在对象中显示（打印）输出文本。使用格式如下：对象名.Print表达式,表达式1对象名一般情况下，Print输出到窗体或者图片框。在本窗体中输出，可以缺省对象名。,VisualBasic程序设计教程,69,2表达式Print方法支持多个表达式的输出，可输出数字、文字字符、日期、逻辑值等。如果Print后面没有任何表达式，则输出空行（在显示效果上相当于回车换行）。,VisualBasic程序设计教程,70,3输出格式多个表达式输出，可以使用分号和逗号分隔。（1）逗号分隔（标准格式输出）。逗号后的下一个表达式按照14个字符的空间分开显示。实际分隔位置还与所在输出行的宽度和分隔的数目有关。（2）分号分隔（紧凑格式输出）。后一个表达式的值接着前一个表达式的输出。,VisualBasic程序设计教程,71,（3）在Print语句最后使用逗号或分号结束，不换行，下一个Print接着按格式输出。（4）使用Spc()和Tab()函数，前者控制插入空格，后者确定列位置,VisualBasic程序设计教程,72,例：PrivateSubForm_click()Me.FontSize=16Print空行PrintA=;1,B=;2Print1,2;3,4PrintA;Spc(4);BPrintTab(10);BPrint1234567890EndSub,VisualBasic程序设计教程,73,2.7.4使用消息对话框MsgBox函数MsgBox函数提供了一个显示应用程序运行信息的标准途径，如图所示：,MsgBox的格式如下：变量名=MsgBox(提示,对话框类型,对话框标题),VisualBasic程序设计教程,74,（1）使用形式:MsgBox有两种使用形式，注意区分，如：A=MsgBox(您确定要退出吗？,vbOKCancel+vbDefaultButton2,退出)和MsgBox您确定要退出吗？,vbOKCancel+vbDefaultButton2,退出“格式1是具有返回值的使用，程序根据用户的不同选择把选择结果赋值给变量A。格式2没有返回值。,VisualBasic程序设计教程,75,（2）提示必选参数项。如果显示多行，可使用Chr(13)+Chr(10)。（3）对话框标题在对话框标题栏显示的信息文本。,VisualBasic程序设计教程,76,（4）对话框类型类型参数由三部分组成，分别确定对话框中的按钮形式、默认的焦点在哪一个按钮上和按钮使用的图标。把按钮形式、焦点选择、图标三组参数中各选一个进行组合，或直接把它们对应的符号常量进行相加确定对话框类型值,VisualBasic程序设计教程,77,VisualBasic程序设计教程,78,VisualBasic程序设计教程,79,（5）返回值使用一个变量保存MsgBox函数返回值，返回值的符号常量和有关描述如表所示。,VisualBasic程序设计教程,80,VisualBasic程序设计教程,81,（6）省略参数项如果只给出提示，系统默认为对话框类型参数值为0，没有对话框标题。如果要省略某一个参数项，需要加上逗号分隔符。例如：A=MsgBox(“您确定要退出吗？”,“退出”),VisualBasic程序设计教程,82,【例2-5】在窗体上设置三个命令按钮，分别为“放大窗口”“缩小窗口”和“结束程序”。点击“放大窗口”“缩小窗口”窗体相应进行放大和缩小操作，并在窗体上显示操作后窗口的宽度和高度，点击“结束程序”则程序结束运行退出。,2.8程序举例,VisualBasic程序设计教程,83,【例2-6】在窗体上放置一个标签显示文本，单击窗体空白处输入字体和字号使显示的文本随之变化。使用三个命令按钮“隐藏显示”“恢复显示”和“程序结束”。其中“隐藏显示”有效时“恢复显示”处于无效状态，反之亦然。,
展开阅读全文