6 个解决方案
#1
请大侠们帮帮忙
#2
看教材中的GDI+绘图
#3
Circle是6.0中的方法,以下是画一个圆的代码,您可以研究一下看看,呵呵。
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Me.CreateGraphics.DrawArc(New Pen(Color.Black), 100, 100, 50, 50, 0, 360)
End Sub
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Me.CreateGraphics.DrawArc(New Pen(Color.Black), 100, 100, 50, 50, 0, 360)
End Sub
#4
Imports System.Drawing
Din g As New Graphics
g.DrawEllipse(New Pen(Color.Red,3),20,40,20,20)
Din g As New Graphics
g.DrawEllipse(New Pen(Color.Red,3),20,40,20,20)
#5
Imports System.Drawing
Dim g As Graphics
g = Me.CreateGraphics
g.DrawEllipse(New Pen(Color.Red,1),10,15,20,25)
Dim g As Graphics
g = Me.CreateGraphics
g.DrawEllipse(New Pen(Color.Red,1),10,15,20,25)
#6
Me.CreateGraphics().DrawEllipse(New Pen(Color.Red,1),0,0,20,20)
//以(10,10)为圆心,10为半径的圆
//以(10,10)为圆心,10为半径的圆
#1
请大侠们帮帮忙
#2
看教材中的GDI+绘图
#3
Circle是6.0中的方法,以下是画一个圆的代码,您可以研究一下看看,呵呵。
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Me.CreateGraphics.DrawArc(New Pen(Color.Black), 100, 100, 50, 50, 0, 360)
End Sub
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Me.CreateGraphics.DrawArc(New Pen(Color.Black), 100, 100, 50, 50, 0, 360)
End Sub
#4
Imports System.Drawing
Din g As New Graphics
g.DrawEllipse(New Pen(Color.Red,3),20,40,20,20)
Din g As New Graphics
g.DrawEllipse(New Pen(Color.Red,3),20,40,20,20)
#5
Imports System.Drawing
Dim g As Graphics
g = Me.CreateGraphics
g.DrawEllipse(New Pen(Color.Red,1),10,15,20,25)
Dim g As Graphics
g = Me.CreateGraphics
g.DrawEllipse(New Pen(Color.Red,1),10,15,20,25)
#6
Me.CreateGraphics().DrawEllipse(New Pen(Color.Red,1),0,0,20,20)
//以(10,10)为圆心,10为半径的圆
//以(10,10)为圆心,10为半径的圆