绘图图形

本文包含用于绘制各种形状和大小的图形的基本语法

Visual Basic 6.0 。 可以使用以下语法在表单上绘制不同类型的几何形状（矩形，正方形，圆形，弧形，椭圆形等）。

基本语法（用于直线，矩形，正方形）

============================

OBJECT.LINE [STEP] (X1, Y1) [STEP] -(X2, Y2), [COLOR], [B[F]]

步骤-关键字说明起点坐标与“ CURRENTX”和“ CURRRENTY”属性给出的当前图形位置有关。 X1，Y1-指示直线或矩形起始点坐标的单值。 如果省略了该行，则在CURRENTX和CURRENTY指定的位置开始。 步骤-关键字指定结束点的坐标与行的起始点有关。 X2，Y2--表示画线终点点坐标的单值。 颜色-表示线的颜色。 可以使用RGB（）或QBCOLOR（）功能，或使用诸如vbGreen之类的已命名色彩常数。

如果省略，则使用前财产的当前值。

乙- （“BOX”） -如果包括的话，使BOX被吸入使用的坐标来指定BOX的对角。 F- （“填充”）-只能与“ B”选项一起使用。 如果使用，“ F”表示将使用与拉制框相同的颜色填充框。 如果组件B 不是被F填充（不使用F选项），盒子与目前“填充颜色”与“填充样式”填充。 FILLSTYLE的默认值是透明的。

Me.Line Step(7000, 5000)-Step(2000, 4000), QBColor(5), BF

基本语法（对于椭圆形状-弧，圆，椭圆）

===============================================

OBJECT.CIRCLE [STEP] (X, Y), RADIUS, [COLOR, START, END, ASPECT]

步骤-指定圆形或椭圆形的中心与“ CURRENTX”和“ CURRENTY”属性给出的当前坐标有关。 X，Y-表示圆或椭圆的中心点的坐标。 RADIUS -表示圆形或椭圆形的半径。 开始，结束-当绘制ARC（部分圆）时，开始和结束指定ARC的开始和结束位置。

两者的范围均为-2Pi弧度到2Pi弧度。 START的默认值为0 RADIANS，而END的默认值为2Pi RADIANS。 换句话说，默认是绘制一个完整的圆或椭圆。

宽高比-表示圆/椭圆的宽高比。 默认值为1.0，可在任何屏幕上产生完美的圆。

Me.Circle (ScaleWidth / 2, ScaleHeight / 2), Switch(ScaleWidth >= ScaleHeight, ScaleHeight / 2, ScaleWidth < ScaleHeight, ScaleWidth / 2), vbRed, 0, 3, 0.8

希望它可以帮助用户在窗体或图片框上绘制任何基本对象。

From: https://bytes.com/topic/visual-basic/insights/706417-drawing-graphics