VB.Net Texte dans un PictureBox

Salut....

J'utilise un picturebox et je fais dessiner plusieurs croix qui sont des coordonnées géographiques.
Chaque coordonnées (croix) à un numéro.
Je veux faire dessiner ce numéro à cote de chaque croix...

Je pense utiliser ce code mais....

Picturebox1_Graphics.DrawString(Numero, MyPen, Brush, CoordXPicturebox + 5, CoordYPicturebox + 5)

Que vaut Brush.... Je regarde sur MSDN je je m'y perd un peu trop....

Quelqu'un peut me dire comment définir la variable Brush et à quoi elle sert...

merci d'avance

Salut,

La msdn est très clair sur le sujet.
Tu t'y prends mal sur le DrawString :
[ Lien ]

__________
Kenji
( Nouveau forum VBA/Office

et bien je ne saisi pas MSDN....

Je ne suis pas un excellent programmeur et MSDN n'est pas mon meilleur ami, j'essais de comprendre mais je n'y arrive pas....

Écrire Dim Brush as Brush....
ok mais comment je défini Brush...

Je réussi facilement a définir MyPen
Public MyPen AsNew Pen(Color.Black, 1)
Mais comment définire le Brush et en même temps le Font....

Peux-tu me donnez un exemple pour le Brush et le Font ???

merci d'avance....

Bon,

	Dim bb As Brush = New SolidBrush(Color.Red) Dim ff As Font = New Font(MyBase.Font.FontFamily, 24, FontStyle.Bold Or FontStyle.Italic) Picturebox1_Graphics.DrawString("Hello World", ff, bb, 50, 50)
(Coloration syntaxique automatique par Kenji)

__________
Kenji
( Nouveau forum VBA/Office

Re... je déclare les variables bb et ff dans ma Form_Load
et j'ai ce message d'erreur...

Dim bb As Brush = New SolidBrush(Color.Black)

Dim ff As Font = New Font(MyBase.Font.FontFamily, 24, FontStyle.Bold Or FontStyle.Italic)

'FontFamily' is not a member of 'System.Drawing.Font'

Normal ???

Je ne peux pas dire que Font a un text normal avec un ecriture normal..., je suis obliger d'avouir cette ligne de code...Dim ff As Font = New Font(MyBase.Font.FontFamily, 24, FontStyle.Bold Or FontStyle.Italic)

???

Merci de ton aide

Ben, remplace ff par PictureBox1.Font alors.

__________
Kenji
( Nouveau forum VBA/Office

ok ca marche pas... :(....

si tu vois autre chose ne te gêne pas....

merci

Qu'est-ce qui marche pas ?
Montre moi ton code.

__________
Kenji
( Nouveau forum VBA/Office

Dim bb As Brush = New SolidBrush(Color.Black)

Dim ff As Font = New Font( MyBase .Font.FontFamily , 24, FontStyle.Bold Or FontStyle.Italic)

Ca dit:
'FontFamily' is not a member of 'System.Drawing.Font'

Ou

Dim

PictureBox1.Font As Font = New Font(MyBase.Font.FontFamily, 24, FontStyle.Bold Or FontStyle.Italic)

Ca dit
End of statement expected

merci    encore hum non plutot merci de ta patient...

Mais lol (désolé j'ai pas pu m'en empecher)
Il ne fallait pas remplacer ff pas PicutreBox1.Font dans la déclaration mais dans l'utilisation

Dim bb As Brush = New SolidBrush(Color.Red)
Picturebox1_Graphics.DrawString("Hello World", PictureBox1.Font, bb, 50, 50)

__________
Kenji
( Nouveau forum VBA/Office