VB教案(PPT)——第四章.pptVIP

第四章 基本的控制结构 4.1 顺序结构 4.2 选择结构 4.3 循环结构 4.4 其他辅助控制语句 4.5 常用算法（一） 4.6 常见错误 （顺序、条件、循环） 4.1 顺 序 结 构 一、赋值语句 形式：[LET]变量名＝表达式 作用： 将表达式的值赋值给变量名。 一般用于给变量赋值或对控件设定属性值。 例： sRate!=0.1 Text1.Text ＝ 欢迎使用Visual Basic 6.0 当表达式的类型与变量的类型不一致时，强制转换成左边的精度，如 iA% = 10 / 3 iA中的结果为3 注意：虽然赋值号与关系运算符等于号都用“=”表示，VB系统会根据所处的位置自动判断是何种意义的符号。 赋值语句的作用是：首先计算“=”右边表达式的值，然后将该值赋给“=”左边的变量或对象的属性。在格式2中，若对象名省略，则默认对象为当前窗体。 例如： x=2 把2赋给x y=x*3 计算x*3的值，得6，把6赋给y x=x+1 计算x+1的值，得3，把3赋给x a$= Hello 把“Hello”赋给a$ Text1.Text=你好！ 把“你好！”赋给Text1的Text属性 【例3.4 】已知三角形三边a，b，c的长，求三角形的面积，输出三条边长及面积。 分析：应用程序的界面应该能让用户输入三边的长，程序在接收用户输入的数据后，利用数学公式对数据进行计算，并把结果输出到屏幕上。已知三角形三边a，b，c的长，求三角形的面积的公式为： 其中p=（a+b+c）/2。 （1）界面设计 在窗体上建立5个标签、3个文本框和1个命令按钮。设置各对象的属性，如表3-3所示。 设计完成的界面如图3-5所示。 （2）编写事件过程如下： Private Sub Command1_Click（） Dim a!，b!，c!，p!，s! a = Text1.Text b = Text2.Text c = Text3.Text p =（a + b + c）/ 2 s = Sqr（p *（p - a）*（p - b）*（p - c）） Label5.Caption = s End Sub 二、与用户交互函数和过程 1. InputBox函数 InputBox(提示[，标题][，缺省][，x 坐标位置][，y坐标位置]) 其中：提示： 提示信息；标题： 对话框标题；缺省：输入区缺省值 函数返回字符类型。 例要在屏幕上显示图示的对话框： 输入框 我们知道，文本框可以接收用户的输入。输入框也可以接受用户的输入，但是其风格和用法有别于文本框。VB提供的InputBox函数可生成输入框。 例如：p$=InputBox（请输入密码，密码框） 执行该语句后，屏幕上显示如图3-6所示的输入框。 每执行一次InputBox函数，用户只能输入一个数据，另外，输入框的样式是固定的，用户不能改变。用户能改变的是输入框的“提示”和“标题”的内容，“提示”和“标题”都是字符串表达式。 InputBox函数的一般格式： InputBox（提示[，标题][，缺省值][，x坐标位置][，y坐标位置]） 需要注意的是：各项参数次序必须一一对应，除了“提示”不能省略外，其余各项均可省略，但省略部分也要用逗号占位符跳过。 例如：f$ = InputBox（第一行 vbNewLine 第二行，，ddd，200，200） 运行时屏幕的显示如图3-7所示。 【例3.5】已知圆半径，求圆周长和圆面积。 （1）界面设计 在窗体上建立两个标签、两个文本框、两个命令按钮。设置各对象的属性如表3-4所示。 （2）编写事件过程如下： Private Sub Command1_Click（） Dim r!，c!，a! r = InputBox（请输入半径，输入框） c = 2 * r * 3.141