Hvis dit billede er en bitmap kan du gøre følgende:
dim myBitmap as bitmap = Nothing <- Deklarer denne i din class
private sub DrawText()
Dim g as graphics Dim myFont As New Font("Arial", 9, FontStyle.Bold) Dim mybrush As New SolidBrush(Color.Black)
Try g = Graphics.FromImage(myBitmap) Catch ex As Exception Exit Sub End Try
g.DrawString("Skriv noget text her", myFont, myBrush, 10, 10)
end sub
i din picturebox/textbox, eller hvad du vil tegne i, skal du nu lave en onpaint event handler.
Private Sub Picturebox1_paint(ByVal sender As Object, ByVal e As PaintEventArgs) Handles Picturebox1.Paint try e.graphics.Drawimage(bitmap,0,0) catch ex as exception exit sub end try
Jeg ser først dit svar nu, men har ikke haft tid til at teste det... Gik væk fra denne løsning, men alligvel er det relevant, har dog ikke tid til at se på det... Så giver dig de point som jeg har udlovet
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.