第4课vb程序设计基础.ppt

第4章 VB程序设计基础 本章要点 ●Visual Basic的基本语句、函数和过程， ●编写代码的书写规则 ●通过例子说明程序设计语言的使用 编码基础 例4-1　编程计算从1到10的累加和，在窗体输出结果。 Private Sub Form_Activate()　声明变量 　Dim i As Integer 　Dim sum As Integer 　sum = 0 　　　 累加器清０ 　For i = 1 To 10 　sum = sum + I　 　　　 从１累加到１０ 　Next i 　Print sum 　　　　输出累加和 End Sub 编码基础 说明： １. 回车键作为语句结束符。只能用回车键作为行与行之间的分隔。 ２．程序代码不区分字母的大小写。 系统自动转换，关键字首字母总被转换成大写，其余字母被转换成小写。 ３．注释文本前加上单引号（）。 在菜单栏上选择“视图→工具栏编辑”选项，在“编辑”工具栏上单击“设置注释块”按钮或“解除注释块”按钮，可对选定的连续多行文本进行注释或取消注释。 编码基础 4．语句分隔符和续行符 ⑴冒号“：”：语句分隔符，在同一行上书写多个语句时使用。 ⑵一行语句最多允许输入255个字符的长度。 ⑶空格和下划线“＿”：语句续行符。当一个单行语句要分为若干行书写时，只需在该行后加入续行符即可。 基本语句 程序是命令动作的有序集合。 赋值语句、条件语句和循环语句是最基本、最常用的语句。 一、赋值语句 一种顺序语句，语句的先后顺序即程序的执行顺序。 格式：[Let] 变量名＝表达式 　　 [Let] 对象.属性 ＝表达式 功能：将“＝”右边表达式的值赋给左边的变量（或对象的属性）。 基本语句 说明： ⑴“＝”是赋值号，不是等号。 ⑵“Let”表示赋值，可省略。 ⑶表达式中可以包含变量、常量、属性值。 ⑷赋值号两边的数据类型通常应保持一致。 例： i%=5 ’i%为整型变量，将整数５赋给i% i%=i%+1 ’在i%=5基础上加１，结果为6，将整数6赋给i% ch$=”abcd” ’ch$为字符串变量, 将”abcd”赋给ch$ Text1.text=”” ’清除文本框的内容 Form1.Caption=”启动” ’窗体Form1标题为” 启动” 基本语句 二、条件语句 通常，按语句在程序中的书写顺序执行。 有时，语句的执行顺序依赖于输入数据或中间运算结果。这时，需根据某个变量或表达式值判定，以决定执行哪些语句和跳过哪些语句不执行。 可以通过条件语句实现这种功能。 VB提供三种条件语句，即： ⑴if…then语句 ⑵if…then…else语句 ⑶Select Case语句 基本语句 １. if…then语句 格式１：If 条件 Then 语句 格式２：If 条件 Then 语句块 End If 功能：若条件成立（为真），执行Then 后面的语句或语句块。否则，执行If语句的下一条语句。 流程图：图4-1 基本语句 说明： ⑴条件一般为关系表达式、逻辑表达式。 ⑵格式１：语句只能是一个语句或写在一行上用“：”分隔的多个语句。 ⑶语句块指一行或多行语句。 例4-3　比较X，Y中的数，大数放在X中，小数放在Y中。 格式１：if xy then w=x:x=y:y=w 　　　　　　　　‘引入中间变量w,使x,y中的值进行交换 格式２：if xy then 　　 w=x 　 x=y 　　 y=w 　　 End If 基本语句 例：将x,y,z三个数按从小到大的顺序排列。 Private Sub Form_Click() 　x = 8：y = 9：z = 3 ‘设定x,y,z的初值 　if xy then w=x:x=y:y=w ‘将x,y中的小数存放于x中 　if xz then w=x:x=z:z=w ‘x中存放x,z中小数,x为最小数 　if yz then w=y:y=z:z=w ‘y中存放y，z中的小数 　Print x, y, z ’在窗体上按从小到大的顺序输出x,y,z的值 End Sub 程序运行时，单击窗体，在窗体上将按从小到大顺序显示x,y,z值。 基本语句 ２. if…then…else语句 格式１：If 条件 Then 语句１ Else 语句２ 格式２：If 条件 Then 　　　 语