Visual Basic程序设计教程电子课件——结构化程序设计与数组.pptVIP

Visual Basic程序设计基础 * 目 录 第1章 Visual Basic 6.0程序设计概述 第2章 程序设计基础 第3章 结构化程序设计与数组 第4章 函数与过程 第5章 常用控件 第6章 图形控件和图形方法 第7章 对话框和菜单程序设计 第8章 文 件 第9章 数据库与数据访问技术 * 第3章 结构化程序设计与数组 3.1 3种基本的控制结构 3.2 选择结构 3.3 循环结构 3.4 多重循环 3.5 数组及其应用 3.6 小 结 * 3.1 3种基本的控制结构 程序设计的起码要求，是使程序能够在计算机上运行并得到正确的结果。但仅此还很不够，一个高质量的程序，还应具有占用内存少、运算速度快等特点，尤其是要具有较好的易读性。 设计程序的过程需多次地阅读、修改程序，如果易读性差、书写紊乱、过多使用goto语句（早期的BASIC语言程序中充斥着大量这种语句），则难以阅读和验证程序，即使运行结果正确，但维护（如以后对程序作修改）会相当复杂和困难。 结构化程序设计的基本思想是：任何程序都可以用3种基本结构表示，即顺序结构、选择结构和循环结构，由这3种基本结构或3种基本结构的复合嵌套构成的程序称为结构化程序。 * 3.1 3种基本的控制结构 图3-1 3种基本结构流程图 语句1 语句2 （a）顺序结构 假 真 表达式 语句1 语句2 （b）选择结构 语 句 表达式 真 假 （c）循环结构 * 3.2.1 IF结构 1．行IF语句 格式：IF <条件> THEN <语句1> [ ELSE <语句2> ] 功能：条件成立执行语句1，否则执行语句2（流程图如图3-1(b)所示）；可以缺省关键字ELSE和语句2。 行IF语句必须在同一行内写完。 Visual Basic的1条语句如果太长，需要写在多行上，则应在行结束处插入“ _”（空格加下划线）后再按回车键，如例3-1所示。 * 3.2.1 IF结构 例3-1 编程，输入x，求下列分段函数f(x)值。用InputBox输入x，计算结果f(x)输出到Text控件。 在窗体上建立文本框控件Text1和命令按钮控件Command1。 编制事件过程Command1_Click如下： Private Sub Command1_Click() Dim x as Single x=InputBox("输入x","计算分段函数的值") If x<=5 Then Text1.Text=Str(1-x*x) Else _ Text1.Text=Str((x-5)^0.25) '以上两行之间加入了2个字符“ _”，因此Visual Basic将它们视为写在1行上的 ‘行IF语句。 End Sub * 3.2.1 IF结构 例3-2 编程，输入x、y，仅当x＜y时，交换x、y值，然后输出x、y的值（在Text控件输入，输出到Label控件）。 建立文本框控件Text1、Text2，标签控件Label1； 编制事件过程Form_Click如下（单击窗体响应）： Private Sub Form_Click() Dim x as Single,y as Single,Temp as Single '文本框Text1、Text2中应已输入相应数值，再赋值到变量x、y。 x=Text1.Text: y=Text2.Text '当x<y时，交换两个变量的值：执行关键字Then后的3个赋值语句。 If x<y Then Temp=y: y=x: x=Temp Label1.Caption="x="+str(x)+" y="+str(y) End Sub * 3.2.1 IF结构 程序中表达式"x="+str(x)+" y="+str(y)不可以写作"x="+x+" y="+y，因为字符类型与数值类型数据不可以用“+”连接。 2．块IF语句 格式：If <条件> Then <语句1> [ Else <语句2>] End If 其中：语句1、语句2可以是多条Visual Basic可执行语句，可包含选择结构、循环结构。 * 3.2.2 情况选择结构 情况选择结构用于多路选择，根据测试表达式的不同取值决定执行该结构的哪一个分支。测试表达式可以为数值、字符等类型，常用的一般为整型或字符串