可视化程序的设计语言基础VBppt课件

1、语句的功能语句的功能详细操作和阐明详细操作和阐明例: Print “OK!逻辑数据逻辑数据整型数据整型数据True = -1 False = 0整型数据整型数据逻辑数据逻辑数据非非0数数 = True0 = FalseA 12 & “12345结果结果1212345全局全局部分部分 数据类型数据类型Const PI=3.14159Const conBirthday=#3/22/93# Public Const Country$=“CHINA,Fax_Num&=36134484Public Const conYearsMissyou As Integer=6 注：常量一旦声明，在

2、其后的代注：常量一旦声明，在其后的代码中只能援用，不能改动码中只能援用，不能改动隐式声明的弱点：变量名隐式声明的弱点：变量名书写错误，不会出错！书写错误，不会出错！在模块或窗体中阐明，在工程内的一在模块或窗体中阐明，在工程内的一切过程中都有效切过程中都有效的值就依然存在，该变量占用的空间不的值就依然存在，该变量占用的空间不被释放。被释放。?想一想：会有想一想：会有什么不同什么不同Public Public As As , , As As 用于阐明全局变量用于阐明全局变量Private Private As As , , As As 用于阐明窗体用于阐明窗体 / / 模块级变量模块级变量Stat

3、ic Static As As , , As As 用于阐明静态变量用于阐明静态变量Name (25)数组名下 标数组元素下标变量数组的引入，可以实现对数据的快速、成批处置。数组的引入，可以实现对数据的快速、成批处置。Dim A()Redim A(3)A(0)=0:A(1)=1:A(2)=2:A(3)=3Redim A(10)思索：此时思索：此时A0A3中的内容为多少？中的内容为多少？Dim A()Redim A(3)A(0)=0:A(1)=1:A(2)=2:A(3)=3Redim Preserve A(10)思索：此时思索：此时A0A3中的内容为多少？中的内容为多少？A0A3中的内容恢中的内

4、容恢复为初始值复为初始值A0A3中的内容维中的内容维持不变持不变Dim a as Daysa = Tuesday a？ a2必需先声明后运用！必需先声明后运用！ ABeABTFeAAeTFTF顺序构造顺序构造分支构造分支构造当型当型 循环循环直到型直到型 循环循环 单分支构造语句单分支构造语句eATFe.g.:If x5 theny=x2+4End if If x5 then y=x2+4eABTF双分支构造双分支构造留意：留意：ElseIfElseIf是连是连着写，中间没有空着写，中间没有空格。格。 A1TFe2e1enA2AnFAn +1TTF e e：测试表达式，可以为任何：测试表达式，

5、可以为任何数值表达式或字符串表达式数值表达式或字符串表达式 C1,c2C1,c2情况表达式，可以为以下几种方式：情况表达式，可以为以下几种方式： 表达式表达式 表达式表达式 To To 表达式表达式 Is Is 多个情况表达式值，中间用多个情况表达式值，中间用“，进展，进展隔开隔开 Case 6Case “6Case 1 To 9Case Is 10Case 1,3,5,7,9For循环语句循环语句AV超越超越e2?v=e1计算计算e1，e2，e3V=v+e3TFeATFExit DoA首先测试循环条件：假设循环条首先测试循环条件：假设循环条件为件为FalseFalse或零，那么跳过后面的或零，那么跳过后面的循环语句序列。循环语句序列。假设循环条件为假设循环条件为TrueTrue或非零，那或非零，那么么VBVB将进入循环体执行语句，执将进入循环体执行语句，执行语句后退回到行语句后退回到Do WhileDo While语句再语句再测试循环条件。测试循环条件。 例：例：s=1+2+3+100 s=1+2+3+100 DoExit Do Loop While eTFAeExit DoA Do Until eExit Do LoopeAFTExit DoA DoExit Do Loop Untile eAe