广东药学院-VB复习课件.pptx

复习;考试题型;计算机系统;编码基础 ;VB常用数据类型 ;变量和常量的命名规则 ;变量声明 ;常量声明;算术运算符;字符串运算符;关系运算符;逻辑运算符 ;表达式;表达式书写举例;常用内部函数 ;常用内部函数;常用内部函数;赋值语句 ;数据输入函数InputBox;选择结构 ;2. If…Then…Else语句(双分支结构) If 表达式 Then 语句块1 Else 语句块2 End If 或 If 表达式 Then 语句1 Else 语句2 例:已知两个数x和y，求两个数中的大者. ;3. If…Then…ElseIf语句(多分支结构) If 表达式1 Then 语句块1 ElseIf 表达式2Then 语句块2 … [Else 语句块 n+1 ] End If 不管有几个分支,当某条件满足,执行相应的语句块,其余分支不再执行.;4. Select Case语句(情况语句) Select Case 变量或表达式 Case 表达式列表1 语句块1 Case 表达式列表2 语句块2 … [Case Else 语句块n+1] End Select;5、条件函数（IIf函数） IIf (条件, 表达式1，表达式2) 先求出两个表达式的值。当条件成立时，函数值为表达式1的值；条件不成立时，函数值为表达式2的值。 例：求x,y中大的数，放入Tmax变量中 ;循环结构;循环结构;计算π的近似值公式为 其中n值由文本框读入。阅读程序并填空， Result是标签框的名称 。 Private Sub Command1_Click() Dim sum As Double, pi As Double Dim i As Integer, n As Integer n = Val(Text1.Text) For i = 1 To n sum = sum + __（1）1/(n^2) Next i pi = __（2）Sqr(6*sum)__ Result.Caption= pi近似值为: Str(pi) End Sub;2. Do…Loop循环语句(用于控制循环次数未知) 形式1： 形式2： Do { While|Until }条件 Do 语句块 语句块 [Exit Do] [Exit Do] 语句块 语句块 Loop Loop { While|Until }条件;3.循环的嵌套 一个循环体内又包含了一个完整的循环结 构称为循环的嵌套. 例：打印九九乘法表 For i = 1 To 9 For j = 1 To 9 se = i × j = i * j Picture1.Print Tab((j - 1) * 9 + 1); se; Next j Picture1.Print Next i;;;数组 ;注意： 1. 下界缺省为0 ,也可在重新定义数组的下界。例如： Option Base 1 2. 在数组声明中的下标说明了数组的整体,即每一维的大小；而在程序其他地方出现的下标表示数组中的一个元素。 两者写法形式相同，但意义不同。 例如： Dim x(10) As Integer 声明了x数组有11个元素 x(10)=100 对x(10)这个数组元素赋值;动态数组及声明;注意： (1)ReDim中的下标可以是常量,也可以是有确定值的变量. (2)在过程中可多次使用ReDim改变数组的大小，或维数. (3)每次用ReDim会使原数组的值丢失，可以在ReDim语句后加Preserve参数来保留数组中的数据.;数组元素的输入、输出;注意： 利用Array对数组各元素赋值，声明的数组是可调数组或连圆括号都可省，并且其类型只能是Variant。 数组的下阶为零，上界由Array函数括号内的参数个数可决定，也可通过函数Ubound获得。;数组的应用;过程 ;自定义函数过程定义;函数名（实际参数列表） 注意：函数在定义和使用时，无论是否有参数，圆括号一定不能省。 特点：不能独立存在，必须参加表达式的运算;自