VisualBASIC基础1.pptVIP

许创 制作 Visual BASIC简介 什么是Visual BASIC Visual —— 视觉的、可视化的 BASIC Beginner’s All-purpose Symbolic Instruction Code BASIC语言是最容易掌握的语言 最原始的BASIC语言只有17个基本语句，第二代有BASICA。第三代有True BASIC、Turbo BASIC、QBASIC、Quick BASIC等，语句均有所扩充。 Windows环境使Visual BASIC应运而生 例11：第一个VB的例子——两数相乘 Visual BASIC 6.0的两个基本特点 可视化的编程工具 程序采用“事件驱动”方式 VB的编程环境 程序设计的一般步骤： 1）创建“工程” 2）设计用户操作界面 3）设置对象属性 4）编写程序代码 5）试运行 6）保存 7）编译成.exe文件（可在脱离VB环境中运行） 8）制成安装盘（打包和展开） 例3：一个最简单的VB程序的设计 对象 属性 属性值 面向对象程序设计 (Object-Oriented Progamming: OOP) VB是一种面向对象程序设计语言，其程序设计原则是以对象为中心 对象 属性 事件 方法 类 事件 —— 每个对象都可以对外界的动作进行识别和响应，事件是一种预先定义好的动作，通过编写代码处理对象所发生的事件，由用户或系统激活。 例：与窗体相关的常用事件 事件 说明 VB窗体 窗体（Form）的设计 窗体的一些重要属性： ControlBox 窗口控制盒，真假值 Icon 设置窗口左上角图标 MaxButton 有无最大化按钮，真假值 Enabled 设置窗体是否响应键盘或鼠标事件 FillColor 设置图形填充色 FillStyle 设置图形的填充方式，8个可选值 ForeColor 设置窗体文本显示的前景色 例一： Private Sub Form_MouseDown(Button As Integer, _ Shift As Integer, X As Single, Y As Single) Print “这是MouseDown事件” End Sub 例二： Private Sub Form_MouseMove(Button As Integer, _ Shift As Integer, X As Single, Y As Single) Image1.Picture = LoadPicture(“C:\Program Files\ _ Microsoft Office\Clipart\Popular\door.wmf ”) End Sub 例一： Private Sub Form_KeyPress(KeyAscii As Integer) Print KeyAscii End Sub 例二： Private Sub Form_KeyDown(KeyCode As Integer, _ Shift As Integer) Circle (400,500), 200 End Sub Private Sub Form_KeyUp(KeyCode As Integer, _ Shift As Integer) Circle (2000,1000), 500 End Sub 例6：一个可改变背景色的窗口 设计分析： 每单击一次窗体，改变一次颜色，三种颜色轮回。需用到静态变量a、求模运算a=(a+1)mod 3 颜色设置函数RGB(0,0,255) 、 RGB(255,0,0)、 RGB(255,255,255)，还使用了Select Case分支控制结构。 例8：Move 移动对象或改变对象尺寸 例：Private Sub Form_Click() Move Left-20,Top+40,Width-50,Height-30 End Sub Print 在窗体、图片框、打印机输出文字 例：Private Sub Form_Click() a=100