《教学PPT基本控制结构》由会员分享，可在线阅读，更多相关《教学PPT基本控制结构（45页珍藏版）》请在金锄头文库上搜索。
1、2017年12月24日星期日,安徽工业大学计算机学院,1,第四章基本控制结构,一、顺序结构二、分支结构三、循环结构,一、顺序结构,格式：=功能：先计算赋值号(=)右边表达式的值，再将其值赋给左边的变量或对象的属性,赋值语句,一、顺序结构,1.1 赋值语句是VB顺序结构中常用语句，通常有以下三种形式给变量赋值给对象的属性赋值给对象赋值,一、顺序结构,1.1.1.给变量赋值,Dim x as integerDim y as String, z as StringX =23 * sqr(9)X=x+1Y=“Welcome to use Visual Basic”Z=y,一、顺序结构,1.1.2.给对
2、象属性赋值,基本格式：对象名.属性名=属性值，例如：Form1.Caption=“第一个VB程序”Command1.Caption=“退出”Text1.Text=Text2.Text,一、顺序结构,1.1.3.给对象属性赋值,即把一个对象的引用赋值给另外一个同类型的对象变量，一般格式为：Set 对象名=对象的引用,一、顺序结构,1.2.Print方法,通常用于窗体对象与Picture对象，输出字符串或图形，具体用法见第二讲窗体部分内容。,1.3.Format函数,通常指定字符串或数字的输出格式。语法如下：X=Format(待输出内容, 输出格式),一、顺序结构,1.3.Format函数,例1.
3、格式化日期型数据Dim MyTime as DateMyTime=#15:03:21#Form1.print format(MyTime, “h:m:s”)输出内容为 15:3:21Form1.print format(MyTime,”hh:mm:ss AMPM”)输出内容为 03：03：21 PM,一、顺序结构,1.3.Format函数,例2.格式化数字输出Dim MyString as StringMyString=format(5459.4,”#,#0.00”)5,459.00MyString=format(334.9,”#0.00”)334.90MyString=format(5,”0
4、.00%”)500.00%,一、顺序结构,1.3.Format函数,常用日期格式字符串,一、顺序结构,1.3.Format函数,常用数字格式字符串,1.3.Format函数,利用Format函数显示有关的日期和时间。Private Sub Form_Click( ) FontSize = 12 MyTime = #9:21:30 PM# MyDate = #7/21/1997# Print Tab(2); Format(MyDate, m/d/yy) Print Tab(2); Format(MyDate, mmmm-yy) Print Tab(2); Format(MyTime, h-m-s
5、 AM/PM) Print Tab(2); Format(MyTime, hh:mm:ss A/P) Print Tab(2); Format(Date, dddd,mmmm,dd,yyyy) Print Tab(2); Format(Now, yyyy年m月dd日 hh：mm) Print FormatDateTime(Now) VB6.0新提供的函数End Sub,一、顺序结构,1.4 InputBox()函数,InputBox()函数显示一个能够接受用户输入的对话框，并返回用户在对话框中输入的信息。其语法格式为：,InputBox(，标题，缺省，x 坐标，y坐标位置),一、顺序结构,1.
6、4 InputBox()函数,实例：在窗体单击事件中添加如下代码：Dim sName As String*40sName = InputBox(“请输入你的姓名” + vbCrLf + “然后单击确定:, 姓名输入, 张三)Form1.Print sName,一、顺序结构,1.5 MsgBox()函数,消息框常用于在程序运行过程中显示一些提示性信息，或要求用户对某个问题进行选择判断。 消息框MsgBox的使用方式有语句方式和函数方式两种 函数方式如下：返回值=MsgBox(,对话框类型,标题),一、顺序结构,1.5 MsgBox()函数,消息框MsgBox实例：在窗体单击事件中添加如下代码：D
7、im a as integerA=msgbox(“请你首先注册”,1+16+256+0,”msgbox例子“)Print a,一、顺序结构,1.5 MsgBox()函数,相关参数说明：是必选项，不可省略。是一个整型表达式，它决定了消息框中按钮的数目和类型以及出现在消息框上图标类型，具体含义见右图：,返回值=MsgBox(,对话框类型,标题),一、顺序结构,1.5 MsgBox()函数,相关参数说明：是一个字符串或字符表达式，被显示在消息框的标题区，若省略之，则标题区显示运行的程序名称。MsgBox()的返回值记录了用户在消息框中选择了哪一个按钮，具体值含义如右图示：如果省略了某些可选项，则必须
8、加入相应的逗号分隔符。,返回值=MsgBox(,对话框类型,标题),一、顺序结构,1.5 MsgBox()函数,相关参数说明： 在使用MsgBox输出消息框时，有时候不需要返回值。此时可以使用MsgBox语句实现，其格式如下： MsgBox ,对话框类型,标题注意：当MsgBox作为语句使用时，不可以使用括号，也不能够获取用户在弹出窗口中单击的按钮。,二、分支结构,2.1 简单分支语句,语法格式：(1). IF THEN END IF(2). IF THEN ,二、分支结构,2.1 简单分支语句,程序举例已知两个数x和y，比较它们的大小，使得x大于y. If xy Then t=x x=y y
9、=t End If 或 If xyz用一个IF语句和一个嵌套的IF语句实现,If xy Then t=x: x=y: y=t If yz Then t=y: y=z: z=t If xy Then t=x: x=y: y=t End If End If,If语句的嵌套注意事项：书写锯齿型； If 与End If 配对。,二、分支结构,2.4 多分支结构,1、IfThenElseIf语句(多分支结构)语法形式： If Then ElseIf Then Else 语句块 n+1 End If,二、分支结构,2.4 多分支结构,IfThenElseIf语句示例已知百分制成绩mark，显示对应的五级制
10、成绩。哪些正确，哪些错误？,二、分支结构,2.4 多分支结构,2、Select Case语句(情况语句)语法形式：Select Case 变量或表达式 Case 表达式列表1 语句块1 Case 表达式列表2 语句块2 Case Else 语句块n+1End Select,数值型或字符串表达式,：是与同类型的下面四种形式之一：表达式 A枚举表达式(用逗号分隔) 2,4,6,8 表达式1 To 表达式2 60 To 100Is 关系运算符表达式 Is =0 And strC =A And Ucase (strC) y，x，y）,二、分支结构,2.5 条件函数,2.Choose函数语法形式： Ch
11、oose（数字类型变量，值为1的返回值，值为2的返回值，),例如，Nop是1-4的值，转换成 + 、-、运算符的语句如下： Op= Choose（Nop，+，-，） 当值为1，返回字符串“+”，然后放入Op变量中，值为2，返回字符串“-”，依次类推；当Nop是1-4的非整数，系统自动取Nop的整数办法在判断；若Nop不在14之间，函数返回Null值。,二、分支结构,分支结构综合示例,由计算机来当一年级的算术老师，要求给出一系列的110的操作数和运算符，学生输入该题的答案，计算机根据学生的答案判断正确与否，当结束时给出成绩。分析:产生110操作数，可通过Int(10 * Rnd + 1) 实现,设置的控件名 Label1 Text1 Picture1,
