نوشتن روس عکس

[behzadk]

می خواستم روی یک عکس چطوری میشه یه نامی رو بنویسم

[Keyvan_Y]

Dim WMFont As New Font(“Comic Sans MS”, 20, FontStyle.Bold)'Define font
Dim WMBrush As New SolidBrush(Color.FromARGB(92, 230, 80, 120)) 'Define colour
PictureBox1.CreateGraphics.DrawString("MY Text", WMFont, WMBrush, 100, 40)'add it to the picture box

[ghafoori]

البته این کد روی کنترل چیزی را می نویسد کد بهتر ان این است


Dim b As New Bitmap(200, 200)
Dim g As Graphics = Graphics.FromImage(b)
g.DrawLine(Pens.Black, 10, 10, 100, 100)
Me.PictureBox1.Image = b