如何使用vb6.0画圆

如何使用vb6.0画圆
private sub cmd1_click（）circle （2000，2000），900‘在窗体坐标2000，2000的地方画一个半径900的圆。

VB6.0中如何对一个圆进行根据角度进行划分?。。然后涂上不同的颜色...
要填充的话，在画【每个扇形】之前，用两个语句（窗体的对象名直接用Me）：对象名.FillStyle = 0 对象名.FillColor = 颜色值 第一行的0表示实心填充，第二行的颜色值可用RGB(i,j,k)或QBcolor(n)来赋值。比如以下语句，就是画两个相邻的扇形，一个红色填充，一个黄色填充：Me.Scale (-100, 1...

如何用vb 6.0 做画图, 怎么写各种形状的代码? (圆形,椭圆,长方形 )
Private Sub Form_Click()'画一个实心椭圆。FillStyle = 0 Circle (600, 1000), 800, , , , 3 '600,1000是中心坐标,800是长轴半径,3是y轴与x轴之比 '画一个空心椭圆。FillStyle = 1 Circle (1800, 1000), 800, , , , 1 \/ 3 '画圆 Circle (3800, 1000), 800 '画矩形 Line (...

visual basic6.0精简版用Circle方法画圆如何在圆内添充颜色?新手提问...
VbFSSolid 0 实填充 VbFSTransparent 1 （缺省值）透明 VbHorizontalLine 2 水平线 VbVerticalLine 3 垂直线 VbUpwardDiagonal 4 上斜对角线 VbDownwardDiagonal 5 下斜对角线 VbCross

vb6.0 如何画出圆角框图形
可以使用直线加圆弧的方法，也可以使用Windows api RoundRect直接画圆角矩形！

vb6.0问题!!!如何随机出现圆点,而且位置不重复?
我画的圆是用shape的控件数组，用了两个timer 控件，两个全局变量a,b，另外说明一点，我只画了9个圆，不过方法都一样。取随机数的时候如果是15个圆，变成rnd*15就行了。Public a As Integer Public b As Integer '定义全局变量a,b Sub Form_Load()Timer1.Interval = 500 Timer2.Interval = ...

在vb中除了circle之外还有什么是可以用来画圆弧的吗?
＝＝＝ 画圆 Circle 方法可画出圆形和椭圆形的各种形状。另外，Circle 方法还可以画出圆弧（圆的一部分）和楔形饼块。使用变化的 Circle 方法，可画出多种曲线。为了画圆，Visual Basic 需要给出该圆的圆心位置和它的半径。画一个理想圆的语法是：[object.]Circle [Step](x, y), radius[, colo...

VB6.0画圆(从内向外画 )?
Private Sub Command1_Click()Dim r As Integer For r = 50 To 1000 Step 100 Picture1.Circle (1050, 1050), r Next End Sub Private Sub Form_Load()Picture1.Move 0, 0, 2100, 2100 End Sub

求高手给代码 VB6.0画一个二次函数(什么样的都行)和一个一次函数的曲线...
这个示例用Circle 方法在窗体中央画许多同心圆。要运行这个示例，将此代码放入窗体的 General 部分。按 F5 并单击窗体。Sub Form_Click ()Dim CX, CY, Radius, Limit ' Declare variable.ScaleMode = 3 ' 以像素为单位。CX = ScaleWidth \/ 2 ' X 位置。CY = ScaleHeight \/ 2 ' ...

VB6.0 MSFlexGrid单元格上画圆,单元格之间画直线
设置单元格对齐：msflexgrid1.colalignment(2) = 3 sdfghf 提问者：匿名 VB 控件 MSFlexGrid如何改变各列设置它就可以设置各列宽度了。 MS