VB语言程序设计第2版林卓然电子教案第3章教学案例.ppt
文本预览下载声明
第
3;一个完整的VB应用程序,一般都包含三部分内容,即
输入 → 处理 → 输出
可通过VB语句、各种控件实现输入输出操作
本章主要内容; 1. 赋值语句[Let]变量名=表达式
示例:x = 5 * 1.4
2. 注释、结束和暂停语句
(1) 注释语句 Rem 注释内容
或 ′ 注释内容
(2) 结束语句 End
(3) 暂停语句 Stop
也可以通过单击工具栏上的“中断”按钮来实现
使用Ctrl + Break组合键,可强制程序暂停运行; (3)变量出现在赋值号的右边和左边??其用途是不相同的。出现在右边表达式中时,变量是参与运算的元素(其值被读出);出现在左边时,变量起存放表达式的值的作用(被赋值)。例如
x = 2
a = 3
x = 2*a + 5
当执行第3行语句“x=2*a+5”时,将读出变量a的值(即3),把该值乘2后加5,然后将结果(11)赋值给变量x。
(4)赋值号两边的数据类型必须一致,即同时为数值型或同时为字符型。;编写的窗体单击事件过程代码如下:
Private Sub Form_Click()
Dim x As Integer, a As Integer
Dim b As Integer, c As Integer
x = 36
a = Int(x / 10) 求十位数
b = x Mod 10 求个位数
c = b * 10 + a 生成新的数
Print 处理后的数: ; c
End Sub
运行程序后单击窗体,输出结果是:
处理后的数:63; 编写的VB程序代码如下:
Private Sub Form_Click()
Dim x As Integer, a As Integer
Dim b As Integer, c As Integer
x = InputBox(“输入一个2位数”)
‘运行时由用户任意给定一个2位数
a = Int(x / 10) 求十位数
b = x Mod 10 求个位数
c = b * 10 + a 生成新的数
Print 处理后的数: ; c
End Sub
执行后,弹出一个输入对话框,若用户输入“83”,输出结果:
处理后的数: 38 ;例3.2 设计程序,实现两个文本框内容的交换; 编写的程序代码如下 :
Private Sub Command1_Click() ′“交换”按钮
t = Text1.Text
Text1.Text = Text2.Text
Text2.Text = t
End Sub; 把上述程序改为以下形式,效果是否一样?; 下列程序的运行结果是什么?; 3.3.1 Print方法
用于显示(输出)文本
格式:[对象名.]Print [表达式列表]
说明:(1)使用的对象可以是窗体等
Print “程序设计” ′在当前窗体上输出
Picture1.Print “程序设计” ′在图片框上输出
(2)表达式列表是一个或多个表达式,如果省略,则输出一个空行 ; 例3.3 Print输出示例
Private Sub Form_Click()
a = 3: b = 4
Print a, b, 4 + a,
Print 2
显示全部