Le cose sono un po' diverse ... guarda questo esempio ...
codice:Dim testo As String = "Quello che vuoi ..." PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage ' Se necessario PictureBox1.Image = Image.FromFile("Immagine.jpg") Dim g As Graphics = Graphics.FromImage(PictureBox1.Image) Dim myFont As New Font("Arial", 12, FontStyle.Regular) Dim grandezzaTesto As SizeF = g.MeasureString(testo, myFont) Dim xLocation As Single = PictureBox1.Image.Width - grandezzaTesto.Width Dim yLocation As Single = PictureBox1.Image.Height - grandezzaTesto.Height g.DrawString(testo, myFont, Brushes.Blue, xLocation, yLocation) g.Save() PictureBox1.Image.Save("ImmagineConTesto.jpg") g.Dispose()

Rispondi quotando