السلام عليكم
هذا الموضوع استكمال لدورة الاكواد الشاملة
'27-جعل الفورم على شكل دائرة مع تغيير لون الخلفية
كود PHP:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Size = New System.Drawing.Size(500, 500)
Dim path As New Drawing2D.GraphicsPath
path.AddEllipse(85, 0, 250, 250)
Me.Region = New Region(path)
Me.BackColor = Color.Gray
End Sub
End Class
'27-جعل الفورم على شكل دائرة مع تغيير لون الخلفية
'28-الفورم يظهر دائرة داخل دائرة
كود PHP:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Size = New System.Drawing.Size(500, 500)
Dim path As New Drawing2D.GraphicsPath
path.AddEllipse(85, 0, 250, 250)
path.AddEllipse(135, 50, 150, 150)
path.AddEllipse(160, 75, 100, 100)
Me.Region = New Region(path)
Me.BackColor = Color.Gray
End Sub
End Class
'28-الفورم يظهر دائرة داخل دائرة
رد مع اقتباس
