arkadaşlar bu kod formun kalp şeklini almasını sağlıyor.

arkadaşlar bu kod formun kalp şeklini almasını sağlıyor. şimdi bunun olması için formun borderstyle sını "none" yapıoruz boyutu biraz büyültüyoruz. sonra forma çift tıklayıp şu kodları yapıştırıyoruz..




Dim path As New Drawing2D.GraphicsPath

path.AddArc(70, 10, 150, 150, 135, 195)
path.AddArc(200, 10, 150, 150, 210, 195)
path.AddLine(92, 139, 210, 270)
path.AddLine(327, 139, 210, 270)
path.AddLine(327, 139, 92, 139)

Me.Region = New Region(path)
Me.BackColor = Color.Red
End Sub