第二章 数据与图形的计算机化(上传).ppt

变量 常量与变量（2） 在程序执行过程中，其值可以改变的量称为变量。 变量定义： 说明符 变量名 [As 类型] 说明符： Dim，Private，Public，Static EX： Dim a as integer Dim b as long Dim c as single 变量 常量与变量（2） VB中的变量类型： IF Expression THENCommandsELSECommandsENDIF IF 语句流 Select Case testexpressionCase expressionlist1 statementblock-1Case expressionlist2 statementblock-2 . . . Case Else statementblock-n End Select Select Case 语句流 简单实例（1） 要求： 1、建立FORM并修改其属性（name、caption）； 2、添加LABEL,并根据需要修改属性； 3、添加按钮，根据需要修改相应属性，并用“开始”按钮CLICK事件去控制LABEL的属性（caption、forecolor等）； 4、添加OPTION和COMBOL控件，根据需要修改属性，并在开始按钮的CLICK事件中通过IF语句和SELECT CASE语句来控制颜色和字体大小 For counter = start To end [Step step] [statements][Exit For] [statements] Next [counter] FOR 语句流 Do [{While | Until} condition] [statements][Exit Do] [statements] Loop WHILE 语句流 简单实例（2） 要求： 1、建立FORM并修改其属性（name、caption）； 2、添加两个LABEL,并根据需要修改属性，其1用于显示计算结果 ； 3、添加两按钮，根据需要修改相应属性，分别用两按钮CLICK事件用FOR和DO WHILE语句编写1加到100的程序； For i = 1 To 100 j = j + i Next i Do While i = 100 j = j + i i = i + 1 Loop 子程序过程与函数过程(1) 　　结构化程序设计的最主要思想是将程序化分成若干个模块，每一个模块用来完成一个或多个特定的操作过程，因此被称为“过程”。 子程序过程 [Private | Public] [Static] Sub 对象名_事件名 （[形参表]） 　　语句组（过程体） End Sub 子程序过程与函数过程(2) 函数过程 [Private|Public] [Static]Function 函数名 ([参数表]) [As 类型] 　函数体 ‘函数体中应包括语句：函数名=表达式 End Function 简单实例（3） 要求： 1、建立FORM并修改其属性（name、caption）； 2、添加两个LABEL,并根据需要修改属性，用于提示用户； 3、添加两个文本框，修改其属性，用于两个数据的输入； 4、添加两个按钮，根据需要修改相应属性，并用分别用两按钮CLICK事件中调用最大公约数函数和子程序； Function gcd1(ByVal x As Integer, ByVal y As Integer) As Integer Do While y 0 reminder = x Mod y x = y y = reminder Loop gcd1 = x End Function Cint (文本框名称.Text)：把文本框里输入的文本转化成整型数据。 Private Sub gcd2(ByVal x As Integer, ByVal y As Integer) Do While y 0 reminder = x Mod y x = y y = reminder Loop xx = x End Sub 判断文本框中输入的类型可以用: Isnumeric( 文本框名称.TEXT)；判断是否为数字 Isdate（文本框名称.TEXT ）；判断是否为日期 更多函数请查询手册或安装MSDN。 消息框提示 MsgBox(prompt [, buttons] [, title] [, hel