文档详情

VB语言程序设计第2版林卓然电子教案第3章教学案例.ppt

发布:2022-06-25约1.01万字共43页下载文档
文本预览下载声明
第 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
显示全部
相似文档