VB程序设计

2017/10/2,计算机基础教学部,1,第4章 VB程序设计基础,4.1 VB的程序语句4.2 顺序结构4.3 选择结构4.4 循环结构4.5 其它控制语句4.6 综合应用,2017/10/2,计算机基础教学部,2,4.1 VB的程序语句,语句书写规则1.VB代码不区分字母的大小写；系统保留字自动转换每个单词的首字母大写用户自定义变量、过程名以第一次为准2.语句书写自由；一行可书写几句语句，之间用冒号分隔;一句语句可分若干行书写，用续行符 _ 连接一行<=255个字符使用缩进格式反映代码的逻辑结构和嵌套关系3.注释有利于程序的维护和调试；Rem 整行注解 （不可加在语句后） '整行注解 或 语句后注解,2017/10/2,计算机基础教学部,3,4.1 VB的程序语句,命令格式中的符号约定<> :必选参数 :可选参数| :多选一，必选选择其一 :包含多种取一的各项, :表示同类项目的重复出现,2017/10/2,计算机基础教学部,4,第4章 VB程序设计基础,4.1 VB的程序语句4.2 顺序结构4.3 选择结构4.4 循环结构4.5 其它控制语句4.6 综合应用,2017/10/2,计算机基础教学部,5,各语句按出现的先后次序执行。,4.2 顺序结构,2017/10/2,计算机基础教学部,6,赋值语句可以给变量赋值或设定属性值输入语句，使用InputBox输入框函数： n=InputBox("请输入一个数值")输出语句： MsgBox过程: MsgBox "你好！" MsgBox函数： a%= MsgBox("要退出吗？", vbYesNo, "确认") Print方法,顺序结构主要语句概览,例：猜数游戏自动产生一个1-100的随机数输入数值，判断是否猜中,2017/10/2,计算机基础教学部,7,1. 赋值语句形式形式1： 变量名=表达式形式2：对象名.属性=表达式作用：计算右边表达式的值,然后赋给左边的变量例如：a = 3*6 + 1 '计算后赋值 Text1.Text = "" ' 清除文本框的内容Lab1.Caption = “欢迎使用VB ” '设置标签标题,4.2.1 赋值语句,2017/10/2,计算机基础教学部,8,注意:,赋值号左边的变量只能是变量或控件属性，不能是常量、常数符号、表达式，下面均为错误的赋值语句：Now()=x+y '左边是表达式(函数)5=sqr(s)+x+y ' 左边是常量,2017/10/2,计算机基础教学部,9,4.2.1 赋值语句,2. 赋值语句的两个常用形式 累加例如：sum = sum + x 累加 假设sum原值是100， x值是10， 执行后sum值是多少？ 计数例如：n = n + 1 计数例：移动足球,2017/10/2,计算机基础教学部,10,4.2.1 赋值语句,3. “=“ 两边数据类型不同时的处理（右边转左边）1)当表达式为数值型并与变量精度不同时，需强制转换成左边变量的精度； 例如：n % = 3.5 结果n的值为42)当表达式为数字型字符串，左边变量是数值类型时，自动转换成数值类型再赋值；例如： n % = “123” n的值为123 n % = “12ab3” 出错3)当逻辑型值赋值给数值型变量时，True转换为-1，False转换为0；反之，非0转换为True，0转换为False例如： n % = True n的值为-14)非字符型的值赋给字符型变量，自动转换为字符型。,2017/10/2,计算机基础教学部,11,4.2.2 数据输入和输出,1.标签和文本框控件标签：属性Caption可用作输出文本框：属性Text可用作输入和输出,标签,文本框,2017/10/2,计算机基础教学部,12,4.2.2 数据输入和输出,2.输入对话框InputBox函数 作用：打开一个对话框，等待用户输入，返回字符串类型的输入值。形式：InputBox(提示,标题,默认值,x坐标位置,y坐标位置)提示项不能省略。若要多行提示，可在每行行末加回车换行vbCrLf。 如： a=InputBox("请输入"+VbCrLf+"本月的工资金额"),2017/10/2,计算机基础教学部,13,InputBox示例,例:创建如图所示程序，要求：单击“输入数值”按钮时，依次弹出2次输入框，供用户输入数据，然后在窗体上输出相关信息，如图。单击“求和”按钮，求出输入值的和并显示。单击“求平均”按钮，求出输入值的平均值并显示。,2017/10/2,计算机基础教学部,14,4.2.2 数据输入和输出,3.MsgBox( )函数和MsgBox过程 作用：打开一个信息框，等待用户选择一个按钮。MsgBox()函数返回所选按钮的值MsgBox过程不返回值MsgBox函数形式：变量% = MsgBox(提示,按钮,标题)MsgBox过程形式：MsgBox 提示,按钮,标题按钮项是一整型表达式，决定信息框按钮的数目和类型及出现在信息框上的图标形式。,2017/10/2,计算机基础教学部,15,MsgBox按钮设置,可多值相加例如i = MsgBox("密码错误", 5 + vbExclamation, "警告"),2017/10/2,计算机基础教学部,16,MsgBox所选按钮返回值,2017/10/2,计算机基础教学部,17,InputBox MsgBox 应用,例： 猜数游戏,2017/10/2,计算机基础教学部,18,MsgBox 如何显示多个信息？,可执行语句中，凡是可以使用常量的地方，都可以使用表达式 MsgBox "欢迎使用VB!"MsgBox 提示C,按钮N,标题CMsgBox Text1.TextMsgBox Left(Text1.Text,1)MsgBox Text1.Text+"你好，欢迎使用VB!"MsgBox "a+b=" & (a+b)例 姓名分解,2017/10/2,计算机基础教学部,19,MsgBox 如何显示不同类型数据？,凡是需要指定类型表达式的地方，都可以使用其他类型表达式，运行时按赋值语句类型转换方式进行转换 赋值语句 变量名=表达式 如类型不同，将表达式的值装换为变量的类型再赋值dim a%,b%a=10:b=20MsgBox a+b '将a+b的值转为字符串显示 '转换方式相当于将a+b赋值给一个字符变量MsgBox a>b MsgBox sqr( 2 )Print sqr("2"),2017/10/2,计算机基础教学部,20,VB语句表达式适用规律,*1、可执行语句中，凡是可以使用常量的地方，都可以使用表达式2、凡是需要指定类型表达式的地方，都可以使用其他类型表达式，运行时会按赋值语句类型转换方式进行转换,2017/10/2,计算机基础教学部,21,4.2.2 数据输入和输出,4.Print方法作用:在对象上输出信息。对象.Print 输出列表 ;|,对象.PrintSpc(n)|Tab(n)输出列表 ;|,说明：对象：对象名，缺省为窗体名输出列表：用逗号分开的表达式分号：定位在上一个被显示的字符之后逗号：定位在下一个打印区开始处(每区14列)Print语句尾若无分号或逗号，输出后自动换行Spc(n)函数：从当前位置起插入n个空格Tab(n)函数：从最左端开始计算的第n列,2017/10/2,计算机基础教学部,22,Print方法和Format示例,例1：在第2行第3列打印5个*，6个空格，2个#print print tab(3);string(5, "*");spc(6);string(2, "#")例2：单击窗体时输入一个数，分别计算并在窗体显示该数的原值、平方、平方根，并使用Format函数将小数保留为3位。,Dim x!x = InputBox("请输入数")Print "原值", "平方", "平方根"Print Format(x, "0.000"),Print Format(x * x, "0.000"),Print Format(Sqr(x), "0.000"),2017/10/2,计算机基础教学部,23,练习题,连接字符串：单击“输入”按钮，输入2个字符串，单击“连接”，将2个字符串连成1个。,2017/10/2,计算机基础教学部,24,练习题,计算三角形面积：输入3条边长，按照t=(a+b+c)/2 ，s=,2017/10/2,计算机基础教学部,25,4.2.3 规范化VB程序设计步骤,1. 确定窗体界面，设置属性 2. 确定对什么对象的什么事件编程 3. 声明变量4. 给原始数据变量赋值（输入） 5. 有关计算6. 给结果变量赋值7. 输出结果,七步骤,2017/10/2,计算机基础教学部,26,4.2.3 规范化VB程序设计步骤,1. 确定窗体界面，设置属性 2. 确定对什么控件对象的什么事件编程窗体Load事件：窗体显示前发生, 可以对属性赋值（相当于第1步中的设置属性），用Print显示信息，或做其它初始化的工作。 在Load事件使用Print,要设置窗体的AutoRedraw为True，否则看不到 按钮单击事件 窗体单击事件 文本框LostFocus事件：用于数据检验 文本框KeyPress： 对按键处理 文本框Changed： 内容改变时处理,2017/10/2,计算机基础教学部,27,4.2.3 规范化VB程序设计步骤,1. 确定窗体界面，设置属性 2. 确定对什么控件对象的什么事件编程 3. 声明变量 （先在代码通用部输入Option Explicit，设置显式变量声明）（1）声明哪些变量？ 原始数据变量，结果变量，中间变量，控制变量（2） 变量的类型？ （3） 过程级变量？窗体级变量（通用部声明）？ 例： Dim a!,b!,c!,t!,s! a,b,c存三条边长，是原始变量。 t 存（a+b+c)/2,中间变量. s存面积是结果变量,2017/10/2,计算机基础教学部,28,4.2.3 规范化VB程序设计步骤,1. 确定窗体界面，设置属性 2. 确定对什么控件对象的什么事件编程 3. 声明变量 4. 给原始数据变量赋值（输入） a=Text1.Text 或 a=Val(Text1.Text） 或 a=Inputbox("请输入边长a:"),2017/10/2,计算机基础教学部,29,4.2.3 规范化VB程序设计步骤,1. 确定窗体界面，设置属性 2. 确定对什么控件对象的什么事件编程 3. 声明变量 4. 给原始数据变量赋值（输入） 5. 有关计算 t=(a+b+c)/2 6. 给结果变量赋值 s=sqr(t*(t-a)*(t-b)*(t-c) （输入和计算可能在两个事件过程中，这时原始变量要声明为窗体变量）,2017/10/2,计算机基础教学部,30,