Bonjour

Le petit bout de code ci-dessous me permet j'ajouter du texte sur mon image dans le Picturebox, mais lorsque je le sauve, le texte lui ne l'est pas.
PbDrs= Mon PictureBox

je rate quelque chose ?


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
  Private Sub PbDrs_MouseDown(sender As Object, e As MouseEventArgs) Handles PbDrs.MouseDown
 
                  PointX = e.X
                  PointY = e.Y
 
      End Sub
 
      Private Sub PbDrs_MouseUp(sender As Object, e As MouseEventArgs) Handles PbDrs.MouseUp
            Dim gr As Graphics = Me.PbDrs.CreateGraphics
            Dim PF9Normal As Font = New Font("Arial", 9, FontStyle.Regular, GraphicsUnit.Point)
 
           gr.DrawString("TextAjouté", PF9Normal, Brushes.Yellow, PointX, PointY)
 
 
      End Sub