scrivere testo su immagine

[Kahm]

stto tentando di scrivere una stringa su una immagine
il codice che uso per ora non funziona e non capisco il motivo
cosa sbaglio?
il codice non da errore, ma non succede niente all'immagine
la label non compare ne nella picturebox, ne quando salvo su file

   PictureBox1.Image = Image.FromFile(FilePath)

        Dim testo As String = "Testo in sovraimpressione"
        Dim grandezzaTesto As SizeF
        Dim temp As Graphics
        Dim myFont As New Font("Tahoma", 10, FontStyle.Regular)


        Dim xLocation, yLocation As Single

        temp = PictureBox1.CreateGraphics()

        grandezzaTesto = temp.MeasureString(testo, myFont)
        xLocation = (PictureBox1.Image.Width - grandezzaTesto.Width)
        yLocation = (PictureBox1.Image.Height - grandezzaTesto.Height)

        temp.DrawString(testo, myFont, Brushes.Lime, xLocation, yLocation) 'LIME

        temp.Save()
        PictureBox1.Image.Save(FilePath)