15-08-16, 01:05 AM
جرب هذ الكود
ويمكنك حفظ الصورة بدل عرضها في السطر الأخير بحيث يكون
bmp.Save
PHP كود :
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim bmp As New Bitmap(Me.PictureBox1.Image)
Dim g As Graphics = Graphics.FromImage(bmp)
g.DrawString(Me.Label1.Text, Me.Label1.Font, New SolidBrush(Me.Label1.ForeColor), New Point(30, 30))
Me.PictureBox2.Image = bmp
End Sub
ويمكنك حفظ الصورة بدل عرضها في السطر الأخير بحيث يكون
bmp.Save