VB6程序设计

第八章 处理鼠标与键盘事件

8.1 处理鼠标事件

8.1.1 鼠标事件 8.1.2 检测鼠标按钮

8.1.3 检测Shift、Ctrl及Alt键的状态

8.2 使用鼠标实现拖放

8.2.1 DragDrop和DragOver事件 8.2.2 自动拖放和手工拖放

8.3 自定义鼠标指针

8.4 处理键盘事件

8.5 应用举例

37

第五章 窗体和标准控件

第九章 图形操作

9.1 VB坐标系统

9.1.1 系统坐标系统

原点(0,0) X轴Y轴 9.1.2 转换坐标系统的刻度

9.1.3 自定义坐标系统

9.2 图形的属性

38

VB6程序设计

9.2.1 线宽和线型 9.2.2 填充 9.2.3 颜色

9.3 图形方法

9.3.1 Cls方法

清除运行时窗体或图片框产生的图形或文本，并将画笔置于坐标原点。 格式：

[Object.]Cls

其中，Object指的是窗体或图片框等对象，缺省时指当前窗体。

注意：在设计时窗体中用Picture属性设置的背景位图和放置的控件，并不受此命令影响。

9.3.2 PSet方法

用于在一个指定的对象上画点，是通过设置指定点像素的颜色实现的。 格式：

[Object.]Pset [Step](x,y)[,Color]

其中，Object指的是窗体或图片框等对象，缺省时指当前窗体；(x,y)用于设定画点的坐标，若前面有关键字Step，则是相对于CurrentX和CurrentY属性提供的当前坐标的相对值；Color用于设定该点的颜色，缺省为当前的ForeColor属性指定的颜色。

9.3.3 Point方法 9.3.4 Line方法

用于画直线、矩形框或填充框。 格式：

[Object.]Line[ Step][(x1,y1)]-[Step](x2,y2)[,Color][,B[F]]

其中，Object指的是窗体或图片框等对象，缺省时指当前窗体；(x1,y1)用于表示直线或矩形的起点坐标，如果省略，起点坐标为当前坐标，若前面有关键字Step，则表示起点坐标是相对于当前坐标的相对值；(x2,y2)用于表示直线或矩形

39

第五章 窗体和标准控件

的终点坐标，若前面有关键字Step，则表示终点坐标是相对于起点的相对值；Color用于设定该点的颜色，缺省为当前的ForeColor属性指定的颜色；B表示利用对角坐标画出矩形；F必须与参数B同时使用，表示矩形以矩形边框的颜色填充。

3#P59[例9.1]单击窗体中图片框控件，用Line方法绘制0~2π之间参数方程：x=acos4θcosθ,y=asinθcos4θ的图形，其中a为图形框的高度的一半。

程序见3#0901

9.3.5 Circle方法

用来画圆、椭圆以及圆弧。 格式：

[Object.]Circle[ Step](x,y) radius,[color,start,end,aspect]

其中，Object指的是窗体或图片框等对象，缺省时指当前窗体；(x,y)表示圆、椭圆或圆弧的中心坐标，若前面有关键字Step，则表示坐标是相对于当前坐标的相对值；radius表示圆、椭圆或圆弧的半径；color表示所用的颜色；start，end表示圆弧或扇形的起始角度和终止角度，单位为弧度；aspect表示圆的纵横比。

9.3.6 PaintPicture方法

9.4 图形控件

9.4.1 图片框和图像控件

图片框（PictureBox）和图像框（Image）控件是显示图形图像的主要控件，都能用来显示图形。图形文件可以是位图（.bmp）、图标（.ico）、图元（.wmf）、JPEG或GIF等文件。

图片框既可用于显示静态图形又可用于播放动态图形，而图像框只能用于显示静态图像。图片框支持各种图形方法和打印方法，也可作为容器，而图像框则

40