vb第三章 简单的程序设计.ppt

第三章 简单的程序设计 主讲：佟彪 辽宁省交通高等专科学校 测绘系 简单的程序设计 3.1 顺序结构 3.2 输入和输出 3.3 选择结构 3.4 选择控件 3.5 程序调试和帮助 3.6 应用举例 关于输入和输出 Dim a#, b#, c#, p#, s# a = Text1.Text b = Text2.Text c = Text3.Text p = (a + b + c) / 2 s = Sqr((p - a) * (p - b) * (p - c) * p) Text4.Text = s 变量声明 数据输入：变量在左 计算：根据公式进行 结果输出：变量在右 VB的输入和输出方法 输入：数据进入内存变量 文本框 InputBox 读数据文件 输出：数据从内存变量传出（存储或显示） 文本框 Print方法 MsgBox 写数据文件 顺序结构 结构化的程序设计包含三种基本结构：顺序结构、选择结构、循环结构 顺序结构：按照语句的顺序执行的结构 VB语言的书写规则 赋值语句 End语句 VB语言的书写规则 VB代码中不区分大小写 语句书写自由：一行多条；一条多行 注释语句：单行（‘或rem），多行（块） 行号与标号 赋值语句 格式：[Let] 变量名 = 表达式 双重功能：赋值和计算 引用不会改变变量的值，赋值才改变 变量可以与自身运算 给变量赋值和设定属性是VB编程的常见任务 几点说明：自动判断等号和赋值号；赋值号左边只能是变量；不能在一条赋值语句中同时给多个变量赋值 End语句 格式：End End If、End Select、End Sub、End Function 强迫中止程序，不调Unload等事件 输入和输出 InputBox()函数 MsgBox()函数 MsgBox过程 Print方法 Cls方法 MsgBox MsgBox举例 MsgBox函数的格式： MsgBox(提示[, 按钮][,标题][,帮助文件,帮助上下文]) MsgBox过程的格式： MsgBox 提示[, 按钮][,标题][,帮助文件,帮助上下文] Button参数的取值 MsgBox函数的返回值 MsgBox举例 MsgBox “直接显示提示信息，用户只能选择确定按钮！” MsgBox “显示三个按钮，让用户进行选择！”, 3,”信息提示” 参数Button的取值说明 MsgBox函数的返回值 InputBox InputBox举例 InputBox格式： InputBox(提示[, 标题][, 默认][, x坐标][,y坐标][, 帮助文件, 帮助上下文]) 例如： m = InputBox(“输入分数（0～100之间）：”, “数据输入”, “80”) Print方法 格式： [对象表达式.]Print [{Spc(n)|Tab(n)}][表达式列表][,|;] 例如： Form1.Print Tab(6);“测量平差程序设计（第一版）” ‘用Tab(6)控制开始打印位置；“;”表示继续打印 Form1.Print ‘打印空行或换行 Print Tab(8);“辽宁省交通高等专科学校”;Spc(2);”测绘系” ‘使用Spc(2)打印2个空格 Print方法（续） CurrentX确定打印指针的横坐标 CurrentY确定打印指针的纵坐标 打印坐标系原点在打印对象的左上角 Cls方法 功能：清除Print方法绘制的内容；打印指针回到原点 格式：[对象.]Cls Cls Picture1.Cls Form1.Cls 作业（习题三） 3. 如何将多条语句写在同一行？如何将一条语句写在多行？语句注释可以有哪些方法？ 4. 如何指定InputBox输入框中的默认值？ 5. MsgBox函数和语句有哪些区别？ 6. 当窗体的AutoRedraw属性设置为False时，用其他窗体遮挡后窗体上本来用Print方法打印显示的内容也会被清除，这样的清除与用Cls方法的清除有何不同？ 补充：VB的关键字 VB关键字总结 选择结构 If语句 Select Case语句 条件函数 学号抽点程序的完善 原来的代码 Dim a%, b%, c% Randomize a = Int(Rnd() * 10) Text1.Text = a b = Int(Rnd() * 10) Text2.Tex