第11章 图形与图像.pptVIP

【范例11-1】 根据CurrentX和CurrentY属性的值，在窗体上输出“CurrentX属性和CurrentY属性”字样。 01 Option Explicit 02 CurrentX属性和CurrentY属性 03 Private Sub Form_Load() 04 frmMain.Font.Size = 20 设置窗体字号 05 frmMain.CurrentX = 800 设置窗体CurrentX值 06 frmMain.CurrentY = 800 设置窗体CurrentY值 07 Print CurrentX属性和CurrentY属性 显示内容 08 End Sub 【范例11-7】 利用Line控件的X1、X2、Y1及Y2属性，在窗体上随机画出直线。在程序中加入一个Timer控件，设置Interval属性为500。为Timer事件添加代码 . 01 Option Explicit 02 Line控件使用演示 03 Private Sub Timer1_Timer() 04 With Line1 设置Line控件的属性 05 Randomize 06 .BorderColor = QBColor(Int(Rnd * 16)) 设置Line控件的颜色 07 .X1 = 2000 设置起点坐标 08 .Y1 = 2000 09 .X2 = 3000 * Rnd + 500 随机生成终点坐标 10 .Y2 = 3000 * Rnd + 500 11 End With 12 End Sub 小结 本章介绍了Visual Basic 6.0中图形和图像的基础知识、图形的绘制、图形和图像控件的使用及图像的保存方法。读者应该将重点放在图形的绘制方面，对于用PSet方法、Line方法及Circle方法必须能够灵活应用。其中范例统计图例的绘制是笔者在实际项目中摘录出的部分代码，具有一定的实用价值，读者从中可以仔细体会基本图形的绘制方法。 常见面试题 1．关于Shape控件。 【考题】如何实现Shape控件的十字线的填充效果？ 2．关于图形的实现方法。 【考题】Visual Basic对图形的操作集中在几个方法上，主要有哪些方法？其具体功能分别是什么？ 综合练习 1．绘制李萨育曲线，该曲线方程如下。 1-* 融知技术学院 第11章 图形与图像 杨章伟 e-mail:yang505412@163.com 课程内容安排 坐标系统 图形的基本属性 图形控件 图形的基本方法 小结 习题 坐标系统 坐标系统是一个生活中很常见的概念。例如直角坐标系，用横坐标X和纵坐标Y来定义一个点在平面上的位置。 在Visual Basic 6.0中绘制图形是在Visual Basic 6.0定义的对象坐标下完成的。Visual Basic 6.0的对象坐标系统与直角坐标系类似。不同的是，系统默认的坐标系是以对象左上角为坐标原点（0，0），以Twips（缇）为量度单位 图形的基本属性 获取当前坐标 CurrentX属性和CurrentY属性分别返回或设置下一次打印或绘图的水平或垂直坐标，这两个属性在设计时不可用。可以通过CurrentX属性和CurrentY属性来获取当前坐标，或者是设置要绘制图形的下一个坐标位置。 设置颜色属性 BackColor属性用于返回或设置对象的背景颜色；ForeColor属性用于返回或设置对象中显示图形或文本的前景颜色。 设置线条属性 DrawWidth属性用于返回或设置图形输出的线宽。 图形控件 图形控件用于完成基本图形的绘制，可以借助图形控件提供的属性和方法，方便地绘制出基本图形。在Visual Basic 6.0中提供了Shape控件与Line控件用于图形的绘制。 通过Shape控件在不用编写代码的情况下绘制出基本的图形。例如，矩形、正方形、椭圆、圆角矩形或者是圆角正方形。该控件也可以设置图形的颜色、填充样式、边框颜色和边框样式。 Line控件用于在窗体或其他容器控件中画出直线。 图形的基本方法 如果用户想在程序中绘制稍微复杂的图形，只用Shape控件和Line控件是不够的。Visual Basic 6.0中提供的图形方法可以在程序中绘制更为复杂的图形。 PSet方法用于将对象上的点设置为