Code
Dim img As Image = Image.FromFile(location)
Dim image1 As Image = New Bitmap(img.Width, img.Height)
Dim G As Graphics = Graphics.FromImage(image1)
G.DrawImage(img, New Rectangle(0, 0, image1.Width, image1.Height), 0, 0, image1.Width, image1.Height, GraphicsUnit.Pixel)
img.Dispose()
G.DrawString(Str, New Font("Arial", 20, FontStyle.Bold, GraphicsUnit.Pixel), New SolidBrush(Color.FromArgb(75, 0, 0, 0)), New Point(x, y))
G.Dispose()
![[Image: Z5SufSb.png]](https://i.imgur.com/Z5SufSb.png)
![[Image: B9IxB84.jpg]](https://imgur.com/B9IxB84.jpg)
![[Image: DnnV3jS.jpg]](https://imgur.com/DnnV3jS.jpg)