vb.net 中如何在窗体中画个圆,用circle语句能不能简单举个例子?谢谢

时间:2023-02-04 23:33:23
vb.net 中如何在窗体中画个圆,用circle语句能不能简单举个例子?谢谢

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

#4


Imports System.Drawing

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)

#6


Me.CreateGraphics().DrawEllipse(New Pen(Color.Red,1),0,0,20,20) 
//以(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

#4


Imports System.Drawing

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)

#6


Me.CreateGraphics().DrawEllipse(New Pen(Color.Red,1),0,0,20,20) 
//以(10,10)为圆心,10为半径的圆