《Visual Basic程序设计教程 教学课件 邱李华 郭全 vb第10章》.pdf

第10章 图形操作 10.1 坐 标 系 10.2 颜 色 10.3 图 形 控 件 10.4 绘 图 方 法 10.5 与绘图有关的常用属性、事件和方法 10.6 图 层 10.7 保存绘图结果 1 10.1 坐 标 系 在VB 中，每个对象都放在它的容器内。 容器都有一个坐标系，用于定义容器中对象的位 置。 VB坐标系的缺省坐标原点（0,0 ）在容器对象的 左上角， 水平方向的x坐标轴向右为正方向， 垂直方向的y坐标轴向下为正方向， 缺省度量单位为“缇”（Twip ）。 2 温 馨 提 示 本文档为 PDF 格式课件，不能运用教学演示， 需要 PPT 格式的课件 ，请 访问 尚辅网 ： 更多课件等您拿。 快速获得课件方法：在淘宝店铺查找输入： 教 学配套课件中心 ；或是直接输入地址 ： 惊喜超出您的想象！ 直接联系获取课件QQ: 349134187 旺旺：源汇雅馨 扫一扫绝对免费获得课件：订阅尚辅网微信公众 号 一扫课件到手！！！！！！ 1．用ScaleMode属性定义度量单位，取值如表 值 常 量 说 明 用户自定义。可设置ScaleHeight、 0 vbUser ScaleWidth、ScaleTop、ScaleLeft属 性 1 vbTwips 缇（缺省值），1440缇等于一英寸 2 vbPoints 点，72点等于一英寸 3 vbPixels 像素，表示分辨率的最小单位 4 vbCharacters 字符 5 vbInches 英寸 6 vbMillimeters 毫米 7 vbCentimeters 厘米 例如： Form1.ScaleMode=7 3 2 ．用ScaleLeft和ScaleTop属性定义坐标原点 ScaleLeft和ScaleTop属性用于重定义容器对 象的左上角坐标，改变坐标系的原点位置。 【例10-1】自定义窗体的坐标原点，通过将图 形移动到该新的原点检验原点的位置。 在窗体上添加一个图形控件Shape1，两个命令按 钮Command1和Command2。运行时按下“移到 默认原点”按钮将图形左上角移动到默认的坐标原 点。按下“移到自定义原点”按钮重新定义坐标原 点并将图形左上角移动到新的原点。 4 Private Sub Command1_Click() Shape1.Left = 0 Shape1.Top = 0 End Sub Private Sub Command2_Click() Form1.ScaleLeft = -1500 Form1.ScaleTop =