请教下VB中扇形的画法Circle (200, 200), 200, vbRed, -pi * 4 / 6, -pi * 1 / 6为什么我这行代码画出来的是圆呢?谁帮我举个例子,画个90度到180度的间的实心扇形.在线等答案
2019-04-13
请教下VB中扇形的画法
Circle (200, 200), 200, vbRed, -pi * 4 / 6, -pi * 1 / 6
为什么我这行代码画出来的是圆呢?谁帮我举个例子,画个90度到180度的间的实心扇形.在线等答案
优质解答
代码如下.单击窗体即可.
＝＝＝＝＝＝＝＝＝＝＝＝
Const pi = 3.1416
Private Sub Form_Click()
FillColor = vbRed
FillStyle = vbSolid
Circle (200,200),200,vbRed,-pi / 2,-pi
End Sub
代码如下.单击窗体即可.
＝＝＝＝＝＝＝＝＝＝＝＝
Const pi = 3.1416
Private Sub Form_Click()
FillColor = vbRed
FillStyle = vbSolid
Circle (200,200),200,vbRed,-pi / 2,-pi
End Sub