Excel 基础教程:画直线
为了在两个坐标点之间画一条直线，可使用 Line 方法的简单形式，其语法如下：
[object.]Line[(x1, y1)]–(x2, y2)[,color]
其中Object是可选择的；若省略，此方法将在代码所连接的窗体（当前窗体）上画线。第一对坐标也是可选的。就所有的坐标值来说，x和y参数都既可以是整数，也可以是分数。例如，下列语句可在窗体上画一条斜线。
Line (500, 500)–(2000, 2000)Visual Basic 所画出的一条直线，要包括第一个端点，而不是最后一个端点。这种行为在从点到点画封闭曲线时是有用的。为了画最后一个端点，应使用这种语法：
PSet [Step](0, 0)[,color]
第一对坐标(x1,y1) 是可选的。如果省略这些坐标，将把该对象的x,y当前位置（画图坐标）作为端点。当前位置是由 CurrentX 和 CurrentY 属性指定的，然而在其它情况它会等于以前的图形方法或 Print 方法所画最后点的位置。如果以前没有使用过图形方法或 Print 方法，或没有设置 CurrentX 和 CurrentY 属性，则缺省位置为对象的左上角。
例如，以下语句通过三点连接画出一个三角形。
'设置起点的x坐标。CurrentX = 1500'设置起点的y坐标。CurrentY = 500'向起点的右下方画一直线。Line -(3000, 2000)'向当前点的左方画一直线。Line -(1500, 2000)'向右上方画一直线到起点。Line -(1500, 500)
图 12.14 显示运行的结果
图 12.14 用 Line 方法画出的三角形
Blanker 应用程序使用 Line 方法创建出了一些有趣的图案样式。为了看到这些图案，可从“选项”菜单中，选定“Crossfire”，然后选定“Start Demo”按钮，即可看到。