清华大学VB经典教案第三节——顺序结构程序设计

顺序结构程序设计课件

输出到图片
• 对象名：窗体、图片库和打印机操作输出到图片上 1.添加图片框（改名称，方便些代码） 2.添加按钮（caption改为，图片输出） 3.编写代码（picture1.print 接表达式） 4.运行调试
2. 与Print方法有关的函数 (1) Tab函数：从左端开始计数 (2) Spc函数：两个输出结果之间的间隔计数
Private Sub Form_Click() Show FontSize = 12 Print Print Tab(10); "姓名"; Tab(25); "性别"; Tab(40); "年龄" Print Print Tab(10); "张红"; Tab(25); "女"; Tab(40); 17 Print Tab(10); "海小翔"; Tab(25); "男"; Tab(40); 18
顺序结构程序设计
班级姓名
回顾！
• 我们前3 章学习了哪些内容？
1.Visual basic简介，版本特点，帮助功能的使用。 2.VB程序设计概述，认识对象、类，简单的程序设计实例 3.语言基础，数据类型，VB表达式和常用的内部函数。
VB三种结构
• 顺序结构
• 选择结构 • 循环结构
程序代码最重
Print , , "Baisc" Print
句尾使用“，”，下一个分区显示
Print " 祝您学好",
Print "Visual"; " Baisc"
End Subprint 计算输出功能输出表达式分隔符

vb程序课件-顺序结构

可视化编程

VB的对象被抽象为窗体和控件，用VB 开发应用程序时，一你输入长方体的长宽高真的有这么强吗？程序自动算出面积和体积并把结果显示在窗体上
新建一个工程
在窗体上画一个标签和一个命令按钮
选中窗体/控件，对其属性进行设置
设置之后的界面如下：
双击按钮进入代码窗口，编写代码
代码如下

Private Sub Command1_Click() Dim a As Single, b As Single, c As Single, s As Single, v As Single a = InputBox("a=", "输入长") b = InputBox("b=", "输入宽") c = InputBox("c=", "输入高") s = 2 * (a * b + a * c + b * c) v=a*b*c Print "面积s="; s, "体积v="; v End Sub
调试运行
长方体的长、宽、高
例如长：1 宽：2 高：3
最后结果显示如下
小结
定义特征
顺序结构
顺序结构的最大特点是在这个结构内按由上到下得书写顺序执行，它只有一个入口和一个出口。这是一种最简单、最基本的结构。
教学重点教学难点
理解程序设计的顺序结构基本思想 1 、顺序结构实现语句的格式和功能 2、变量的特点 3 、编写简单的程序的过程
开始
两数交换的流程图
输入a，b的值 t=a a=b b=t 输出a，b的值结束

VB顺序结构程序设计

3. 说明 (1) <变量名>: 应符合变量命名约定。 (2) <表达式>: 常量、变量、表达式、属性。 (3) <对象名>: 缺省时为当前窗体。 (4) 赋值号“=”: 与数学中的等号意义不同。
例: 1
(5) 赋值号左边必须是变量或对象属性。
例: 1
""
1"确定"
1 ' 错误，赋值号左边是表达式
例：用标签1输出一个数值型数据 X=3^5 1 = (X)
例：用标签1输出多个数，分多行输出。通常要先设置标签的属性和属性为。 X = 3 ^ 5: y = 7 ^ 4 1 = "" & (X) & _ & "" & (y)
【例4-4】已知三角形的三条边a、b、c的长度，用海伦公式求三角形的面积S。海伦公式:
⑤单击“退出”按钮结束程序的运行。 3()
4.2.4 框架控件
框架()控件是一种容器控件。在框架控件内的控件可以随框架一起移动，并且受框架控件的某些属性（等）的控制。
使用框架控件对其他控件进行分组，可以使界面更清晰明了。一般不需要响应框架控件的事件。
使用框架控件将其他控件分组的方法有两个：先画框架控件并激活，再加入其中的控件，这样可使框架控件及其上的控件一起移动。若要用框架控件将现有的控件分组，可先选定所有控件，将它们剪切到剪贴板上，然后选定框架控件进行粘贴。以42为例。
=1 例：将文本框1中输入的字符串作为数据赋给整型变量
A A = (1)
1. 文本框控件的常用属性
(1) 属性：表示文本框中包含的内容 (2) 属性：决定文本框的内容是否可编辑 (3) 属性：为,可输入多行文本，默认为. (4) :决定是否有滚动条以及滚动条的显示方式。默认为不显示。 (5) :显示在文本框中的替代符，如“*”，主要用于口令的输入。 (6) :指定显示的字符个数，超出部分不接收，并同时发出嘟嘟声。

Visual_Basic程序设计课件——第三章

【例题】移动对象，程序运行时使命令按钮移到窗体的中心位置。
TextHeight和TextWidth方法
TextHeight方法和TextWidth方法用于帮助设置坐标，作用为返回一个文本字符串的高度和宽度值。 TextHeight方法语法格式为： [对象名].TextHeight（字符串） TextWidth方法语法格式为： [对象名].TextWidth（字符串）
Spc函数
Spc函数也可以对输出进行定位，作用是提供n个空格键。 Spc函数语法格式为：Spc（<n>）例如：Print “a” ；Spc（10）；“b”；Spc（5）；“c” 输出：a b c 说明： 1、参数n是一个数值表达式。 2、Spc函数与其他输出项之间用分号隔开。 3、Spc函数和Tab函数的作用相似，可以相互替代，不同的是，Tab函数从对象的左端开始计数，而Spc函数只表示输出项之间的间隔。
输出信息对话框
MsgBox函数可以弹出一个带有若干按钮的对话框，并在对话框中显示询问消息，等待用户做出选择，并返回一个整数值，告诉用户单击哪一个按钮。 MsgBox函数的语法格式：变量=MsgBox（<信息内容>[，<对话框类型>[，<对话框标题 >]]）说明： 1、信息内容是在对话框中出现的提示文本。在信息内容中使用硬回车符（CHR（13））可以使文本换行。对话框的高度和宽度随着信息内容的增加而增加，最多可有1024个字符。 2、对话框类型指定对话框中出现的按钮和图标，一般有3个参数。其取值和含义如下：
CurrentX和CurrentY属性
CurrentX和CurrentY表示当前输出位置的横坐标与纵坐标。
文本属性
①字体（FontName）格式为：FontName[=“字体类型”] ②字号格式为：FontSize[=“点数”] 注：“点数”用来设定字体的大小，默认情况下，系统使用最小的字号：“点数”为8。 ③斜体格式为：FontItalic[=Boolean] 注：当Boolean值为True时，文本以斜体字输出，Boolean默认为False。 ④粗体格式为：FontBold[=Boolean] 注：当Boolean值为True时，文本以粗体字输出，Boolean默认为False。

VB 第03章顺序结构程序设计

程序设计的一般步骤
第一步，分析问题。
第二步，程序流程设计。第三步，人机界面设计。
第四步，程序代码设计。
第五步，运行、调试。第六步，编译、发布。
字符数。
例如： Print “后面有8个空格”; Spc(8); “前面有8个空格”
输出结果：后面有8个空格前面有8个空格
Tab(n) ——用来将插入点定位在绝对列号上，n 为列号。例如：输出结果： Print Tab(10); “姓名”; Tab(25); “年龄” 姓名年龄
Cls方法
InputBox函数
例如：
Dim strName As String * 40 strName = InputBox(“请输入你的姓名” + vbCrLf + “然后单击确定” , “输入框” ) 也可以使用如下语句： Dim strName As String * 40 strName = InputBox( “请输入你的姓名” + Chr(13) +
‘ 计算 x*3 的值，得6，把6赋给y
‘ 计算 x+1 的值，把 3 赋给 x ‘ 把 “Hello” 赋给a$ ‘ 0.1 赋给 sRate
Text1.Text ＝ “欢迎使用 Visual Basic 6.0 ”
注意：当表达式的类型与变量的类型不一致时，强制转换成左
边的类型。例如： iA% = 10 / 3.0 ' iA中的结果为3
[对象名.] Print [表达式列表]
其中：对象名——一般为窗体名。省略此项，表示在当前窗体
上输出。表达式列表——是一个或多个表达式。若为多个表达式，则各表达式之间用“，”或“；”隔开。省略此项，则输出一空行。功能：依次计算各个表达式的值，按指定的格式在对象上打印输出。

VB顺序结构程序设计

单击“确定”，返回文本框中的文本到变量R中单击“取消”，返回一个零长度的字符串 10
4.2.2 用文本框(TextBox)输入数据第四章顺序结构程序设计用文本框输入数据时，也就是将文本框的Text 属性的内容赋值给某个变量。例：将文本框Text1中输入的字符串赋给字符串变量Mystr Dim MyStr As String MyStr = Text1.Text 例：将文本框Text1中输入的字符串作为数据赋给整型变量 Dim A As Integer A = Val(Text1.Text)
14
4.2.3 焦点和Tab键序
第 1. 焦点四当前可以接收用户输入的对象称为具有焦点。章注意: 并非所有控件都可以接收焦点。而且, 只有顺序 Enable和Visible属性为True时，才可以接收焦点。结构 2. 事件程 GotFocus 发生在对象得到焦点时序 LostFocus 发生在对象失去焦点时设计 3. 对象何时得到焦点运行时选择对象(鼠标、Tab键、访问键) 在代码中使用SetFocus方法其格式为：<对象>.setfocus 15
20
第四章顺序结构程序设计
④单击“清除”按钮清除所有文本框的内容，并将焦点定位在文本框Text1中。 Private Sub Command2_Click() Text1.Text = "" Text2.Text = "" Text3.Text = "" Text4.Text = "" Text1.SetFocus End Sub ⑤单击“退出”按钮结束程序的运行。 Private Sub Command3_Click() End End Sub

vb2010第3章

Command2.Enabled = False Command1.Enabled = True End Sub
Copyright © by metc
7
VB 2010

❖3.1 顺序结构程序设计
VB 2010
2. 使用Print方法
（1）Print方法 Print方法用于在窗体（Form）、立即窗口（Debug）、图片框（Pictur eBox）或打印机（Printer）等对象 [〈对象名称〉.]Print [〈表达式列表〉][，|；]
② Spc函数。用Spc函数跳过n列。其格式如下：Spc（n）。其中，n是在显示或打印下一个表达式之前插入的空格数。Spc函数与输出项之间用分号隔开。 Spc函数与Tab函数的作用类似，可以互相代替。但需要注意，Tab函数从对象的左端开始计数，而Spc只表示两个输出项之间的间隔。
Copyright © by metc
Private Sub Form_Activate（）
Text1.SetFocus
End Sub
（2）Tab键顺序
Tab键顺序是指用户按Tab键时，焦点在窗体上的控件之间移动的顺序。一般
情况下，Tab顺序由向窗体中建立控件的先后顺序确定。
设置控件的TabIndex属性可以改变控件的Tab顺序。当在窗体上建立第一个
' 计算三种家电总销售额
Label7.Caption = x
End Sub
Private Sub Command3_Click（）
' 关闭按钮的单击事件
Unload Me
' 关闭当前窗体
End Sub
Copyright © by metc
14

大学vb 第3章顺序结构

（1）说明：变量声明
（2）输入：文本框、 InputBox
（3）加工：数据处理
（4）输出：文本框、标签、窗体、MsgBox
赋值语句
2013-10-29
赋值语句 P76
[ Let ] 变量名| 对象名.属性名 = 表达式
注：1、与等于号的区别。 2、左边通常是变量。 3、一次只能为一个变量赋值。 4、两边类型不一致时，强制转换为左边类型。 ★ 非数字字符串赋给数值变量时会出错。例：Dim a% a = "sf " 会出现“类型不匹配”错误
2013-10-29
输入的几种实现方法： a=1 a=text1.text a = InputBox("请输入所需的数据：")
输出的几种实现方法： text1.text=a Print a Label1.caption=a MsgBox "该数据是" & a
演示
2013-10-29
2013-10-29

2、MsgBox函数
格式：
MsgBox prompt [,buttons][,title] 变量[%]= MsgBox（prompt [,buttons][,title]）功能： MsgBox函数打开一个信息框，等待用户选择一个按钮，并可根据用户在对话框上的选择进行对应的响应，此函数返回一个整型值，以
2013-10-29
举例： MsgBox "确实要删除吗？请选择！" 执行该语句后屏幕出现一个对话窗口，如下图所示：
2013-10-29
dim a as Integer
a= MsgBox("提示信息" ,1, "标题")

清华大学VB经典教案第三节——顺序结构程序设计

顺序结构程序设计课件

vb程序课件-顺序结构

VB顺序结构程序设计

Visual_Basic程序设计课件——第三章

VB 第03章 顺序结构程序设计

VB顺序结构程序设计

vb2010第3章

大学vb 第3章 顺序结构

VB 第03章顺序结构程序设计

大学vb 第3章顺序结构