《判断选择语句.ppt》由会员分享，可在线阅读，更多相关《判断选择语句.ppt（20页珍藏版）》请在三一文库上搜索。
1、变量,变量：程序运行过程中值变化的量叫变量 变量命名：由字母开头，后面跟字母、数字、下划线，如： Zf1 zf2 a1 a_2 但 vb中已经有意义的字符如IF END + =不能使用. 变量的作用：保存临时的数据，数据类型可以是整数（integer)、小数(single)、字符(string)等，如 A=3 b=3.5 c=“汉” 由于变量在程序执行完后会初始化，所以如要保存变量的值，要在程序外定义变量如下： DIM s as integer 定义变量 s 为integer（整数 型 ） Private Sub Command1_Click() s = s + 1 command1.capt
2、ion=s End Sub,累加器,在数学公式中，x=x+3是无解的，但在计算机中有其意义，这是由计算机运算过程决定的。 累加器格式：x = x + 7 应用： X=3 X=x+7 先计算”=“右边的式子结果为10，计算后的结果再存入变量X中,x的值由原来的3替换为10. Print x,MsgBox 函数,在对话框中显示消息，等待用户单击按钮，并返回一个值指示用户单击的按钮。 MsgBox(prompt, buttons, title 例子： a = MsgBox(“你的得分是：“ & s, vbOK, “成绩查询“) 变量A用来保存你按的是“确定”、还是“取消”的值 &：连接符，将两个字符
3、连接在一起，如 “中国” & “福建” 则为“中国福建” 注意：&的两边要留空格,MsgBox 函数有以下返回值：,Visual Basic编程,5,窗体设计器,窗体布局窗口,工程管理器窗口,工具箱,菜单条,属性窗口,标准工具条,1.主窗口 应用程序窗口,由标题栏、菜单栏和工具栏组成 2.窗体(Form)窗口 设计VB程序的 界面 3.代码(Code)窗口 编辑窗体、标准模块中的代码 4.属性(Properties)窗口 所有窗体或控件的属性设置 5.工程资源管理器(Project Expror)窗口 保存一个应用程序所有的文件 6. 工具箱(toolbox)窗口 显示各种控件的制作工具,供用
4、户在窗体上设计,Visual Basic编程,7,VB 工具箱 VB的部分对象,PictureBox 控件,TextBox 控件,CommandButton 控件,OptionButton 控件,ListBox 控件,VScrollBar 控件,DriveListBox 控件,FileListBox 控件,Line 控件,Data 控件,Image 控件,Shape 控件,DirListBox 控件,Timer 控件,HScrollBar 控件,ComboBox 控件,CheckBox 控件,Frame 控件,Label 控件,2.4基本控件和窗体,一.常用属性 1.Name名称属性 创建的对
5、象名称,有默认的名.在程序中，控件名是作为对象的标识而引用，不会显示在窗体上。 2.Caption标题属性 该属性决定了控件上显示的内容。 3.Height、width、top和left属性,scalewidth,scaleheight,height,定时器控件（Timer）,用途：通过设置时间间隔，当经过设定的时间后， 自动触发该控件的Timer事件，执行其中的代码程序。 属性： Interval：以毫秒为单位的时间间隔。取值为0-65535。 0表示不起作用。 Enable：为True时，打开计时器，开始计时，根据Interval值，触发Timer事件；为False时，关闭计时器。 事件：
6、 Timer：计时器唯一支持的事件，当设定时间间隔到达后，触发。 注意：窗体上的计时器，在运行时是不可见。,Timer,数字的累加、累减,数字的累加：s=s+1 数字的累减：s=s-1 见下面例子：,. Visable属性 作用：控制对象的可见与不可见。 如 image1.visable=true 则image1可看见 如 image1.visable=false 则image1不可看见 请大家添加一个COMMAND1对象，然后把以下程序放入command1_click()事件中，观察效果： Private Sub Command1_Click() Command1.Visible = Fal
7、se End Sub Enabled属性 作用：控制对象可否响应事件，即能否使用。 如 command1.enabled=false 则command1无法点击 请大家添加一个COMMAND1对象，然后把以下程序放入command1_click()事件中，观察效果： Private Sub Command1_Click() Command1.enabled = False End Sub,If 假设条件1 Then 假设条件1成立时执行的语句块1 (elseif 假设条件2 Then 假设条件2成立时执行的语句块2) (elseIf 假设条件3 Then 假设条件3成立时执行的语句块3) (e
8、lse 所有条件都不成立时要执行的语句块) end If,Private Sub Command1_Click() 信息=5.3 If 信息=5 Then 等级=“博士生“ elseif 信息=4 then 等级=“大学生“ elseif 信息=3 then 等级=“高中生“ else 等级=“补考“ end if print 等级 end sub,Private Sub Command1_Click() 信息=5.3 If 信息=3 Then 等级=“合格” else 等级=“补考” end if print 等级 end sub,Private Sub Command1_Click() 信
9、息=5.3 If 信息=3 Then 等级=“合格” end if print 等级 end sub,If 语句的变化过程例子：从复杂到简单,IfThenElseIfEnd If 是 VB 中的块结构条件语句。 作用：主要用来针对不同的情况，让应用程序做出不同的反应。 语句功能如下： If 假设条件1 Then 假设条件1成立时执行的语句块1 (ElseIF 假设条件2 Then 假设条件2成立时执行的语句块2) (ElseIf 假设条件3 Then 假设条件3成立时执行的语句块3) (Else 所有条件都不成立时要执行的语句块) End If 上面的语句块含义为：如果“条件1”成立，则执行“
10、语句块1”；否则如果“条件2”成立，则执行“语句块2”；如果所有情况都不成立，则执行 Else 之后的语句块并最后跳出判断过程。 中间可有好多elseif，是对条件的再次排除，有几点必须加以强调： （1）、在上面的语句块中，ElseIf 之间没有空格，如果有空格即 Else If ，块结构则不成立。Else If 这种形式只能在单行结构条件语句中成立，而不能在块结构条件中成立。 （2）、执行语句块的程序代码不能紧跟 Then ，必须放到下一行中，这是块状结构的规定。 （3）、在块结构判断语句中，ElseIf 子句的数量没有限制，可以根据需要加入任意多个 ElseIf 子句。 （4）、ElseI
11、f 与 Else 都是可选的。 （5）、只要有END IF，则THEN后没有语句，语句在下一行，同样ELSE后没有语句，语句在下一行。,If 信息=5 Then 等级=“博士生” elseif 信息=4 then 等级=“大学生” elseif 信息=3 then 等级=“高中生” else 等级=“补考” End if,If 信息=3 Then 等级=“合格” else 等级=“补考” End if,If 信息=3 Then 等级=“合格” End if,VB的第二种结构语句：选择判断语句 1、作用：根据条件控制程序运行的流程，实现不同情况执行不同操作。 2、语句 格式1：If Then 格
12、式2：If Then end if 例子1： 如果有穿鞋套就可以进来 表示为： if 有穿鞋套 then 进来 例子2： 如果 有穿鞋套 并且有带书 就可以进来 表示为： if 有穿鞋套 and 带书 then 进来 例子3： 如果 总分达到500分 就 合格 表示为： if zf=500 then print “合格”,VB的第二种结构语句：选择判断语句 1、作用：根据条件控制程序运行的流程，实现不同情况执行不同操作。 2、语句 格式3：If Then else 格式4：If Then else end if 例1：如果 明天不下雨 就去植物园玩 ，否则就在家看书 表示为： if 明天不下雨
13、 then去植物园玩 else 在家看书 例2：如果 超载 就罚5000元 ，否则就交过路费50元 表示为： if 超载 then monkey=5000 else monkey=50 zaizhong=2000 zhonglian=text1 if zaizhong=zhonglian then monkey=5000 else monkey=50 end if,.选择结构 1. IfThen语句(单分支结构) If Then 语句块 End If 或 If Then 例:已知两个数x和y，比较它们的大小， 使得x大于y. If xy Then t=x x=y y=t End If 或 If
14、 xy Then t=x: x=y: y=t 重要的是学会两个数的交换，若上述语句次序变一下，结果如何？,2. IfThenElse语句(双分支结构) If Then Else End If If Then Else 计算分段函数,单分支结构实现: y=cos(x)x3+3*x If x0 Then y=sin(x)+sqrt(x*x+1) 双分支结构实现: If x0 Then y=sin(x)+sqrt(x*x+1) Else y=cos(x)x3+3*x End If,3条件判断中关系运算符 将两个操作数进行大小比较,结果为逻辑量。 字符串比较,则按字符的ASCII码值从左到右一一比较,
15、直到出现不同的字符为止.。 例： “ ABCDE “ “ ABRA “ 结果为 False,“男字“ “女字“ 按汉字的拼音字母比较,4. 条件判断中逻辑运算符 将操作数进行逻辑运算，结果是逻辑值 条件表达式1 And 条件表达式2 条件表达式均为T 结果为T 条件表达式1 Or 条件表达式2 条件表达式有一个T 结果为T,例：用人单位招聘秘书：年龄小于40岁，女性，学历专科或本科 年龄40 性别=“女” (学历=“专科” 学历=“本科”) And And Or 考虑：若分别写成： 年龄40 And 性别=“女” And (学历=“专科” And 学历=“本科”) 年龄40 Or 性别=“女” Or (学历=“专科” Or 学历=“本科”) 例：表示算术表达式： 正确的VB表达式： 3=x And x =7 错误的VB表达式： 3=x=7 或 3=x Or x=7,比a小，比b大 用 Or Xb,比a大，比b小 用 And Xa and x7,