vb经典ppt教程03.ppt

1、第3章顺序结构程序设计,3.1数据输出 3.2基本语句 3.3数据输入 3.4使用对话框,3.1数据输出,一、直接输出到窗体 二、输出文本到图片框 三、使用“标签”控件的输出,一、直接输出到窗体,1使用Print 方法 . Print ，|； 2与Print方法有关的函数 Tab(n) ：将打印位置定在第n列。 Spc(n) ：类似于Space函数，插入n个空格。 3. 输出位置类属性： CurrentX、CurrentY。 案例程序1：平抛运动 4.窗体大小类属性： ScaleWidth、ScaleHeight和Width、Height,一、直接输出到窗体,5. 属性字体类属性： ForeC

2、olor、FontName、FontSize、FontItalic、FontBold、FontStrikeThru、FontUnderline、FontTransparent； 案例程序2：特效文字的制作 中国电脑教育报199991 案例程序3：在VB中用颜色渐变技术制作幻影字 _新朝电子2000.3 6清除方法Cls . Cls,二、输出文本到图片框,与输出文本到窗体完全一样，只是在Print方法前需指明对象为“图片框”。如： Private Sub Timer1_Timer() Picture1.CurrentX = Rnd * Picture1.ScaleWidth Picture1.C

3、urrentY = Rnd * Picture1.ScaleHeight Picture1.FontSize = Rnd * 10 + 5 Picture1.ForeColor = QBColor(Rnd * 15) Picture1.Print * End Sub 注意：AutoRedraw属性！,三、使用“标签”控件的输出,1标签的外观 BorderStyle 属性和Transparent属性。 2标签适应内容 AutoSize属性和WordWrap属性。 案例程序4：用VB制作特技字幕 多媒体世界2000年第4期,3.1数据输出回顾,一、直接输出到窗体 二、输出文本到图片框 三、使用“标

4、签”控件的输出,3.2基本语句,一、赋值语句：Let 二、卸载对象与结束程序 三、注释与暂停,一、赋值语句：Let,1.格式： Let 如： Let X = 5 “=”的读法：读作“取值”比较恰当。 2.例题： Page 51例3-9： Private Sub Command1_Click() t = Label1.Caption Label1.Caption = Label2.Caption Label2.Caption = t End Sub,二、卸载对象与结束程序,1Unload语句 格式： Unload对象名 说明： 卸载窗体时会引发Unload事件。 2End语句 格式： End 说

5、明： 强行结束程序，不会引发Unload事件。,三、注释与暂停,1注释语句 格式： Rem或 作用： 程序解释。 2暂停语句 格式： Stop 作用： 设置断点，调试程序。,3.2基本语句回顾,一、赋值语句：Let 二、卸载对象与结束程序 三、注释与暂停,3.3数据输入,一、使用“文本框”控件的输入 二、使用焦点 三、使用“框架”控件,一、使用“文本框”控件的输入,1文本框的主要属性 Text、Enabled、MaxLength、Locked、PasswordChar、ToolTipText等。 2使用文本框控件 Page55例3-12 发工资问题 3多行文本框 MultiLine和Scrol

6、lBars属性。,二、使用焦点,1程序运行时改变焦点的方法 用鼠标单击 用Tab键切换 用热键选择 2在程序中设置焦点的方法 SetFocus方法 TabIndex属性,三、使用“框架”控件,框架是一个用于分组的容器控件，其内的控件会受框架控件的Visible属性及Enabled属性的控制。当框架移动时，其内的控件也会同步移动。 主要属性： Caption Enabled Visible BorderStyle,3.3数据输入 回顾,一、使用“文本框”控件的输入 二、使用焦点 三、使用“框架”控件,3.4使用对话框,对话框有很多种，如打开对话框、另存为对话框、颜色对话框、字体对话框、提示信息对

7、话框、输入对话框等。 一、显示信息信息对话框(MsgBox) 二、输入数据输入框（InputBox）,一、显示信息信息对话框(MsgBox),可以用MsgBox函数或MsgBox语句来设置信息对话框中的有关信息。 1MsgBox语句： MsgBox内容prompt，类型buttons，标题title 如：MsgBox 要退出吗？, vbYesNo + vbQuestion, 注意,说明： buttons详见Page59三张表。 书中的表310有误： 32和48应互换位置。,一、显示信息信息对话框(MsgBox),2MsgBox函数 MsgBox（内容prompt，类型buttons，标题tit

8、le） 3说明： 函数返回值 用常量记忆最方便。 Page 60,若要保留返回值，则必须要用函数形式调用，如： 变量= MsgBox（Are you sure?, 3 + 48 + 256） 若无需保留返回值，则用语句形式调用。,二、输入数据输入框（InputBox）,提供一个能让使用者输入简单信息的对话框；也有输入框函数和输入框语句两种调用形式，规则与要求与消息框相同。但有价值的只有输入框函数，其格式为： InputBox(提示信息prompt,标题title,默认值default) 如 ： Private Sub Command1_Click() Dim S As String S = InputBox(请输入姓名：, 个人资料, 姚明) End Sub,在VB编辑环境中，不能正常显示汉字！但生成的应用程序（EXE文件）不存在此问题！,3.4使用对话框