Gérer dynamiquement la taille des caractères dans un form VB.NET

Bonjour à tous,

Je développe un prg de jeu de lettres pour malvoyants et je voudrais gérer dynamiquement la taille des caractères des labels en cliquant sur un bouton + et -.

Cela paraît assez simple en théorie mais je ne trouve pas par quel moyen y parvenir.

Je pensais à une qq chose du genre "lblLettre1.Font.Size = lblLettre1.Font.Size + 20" mais ".Font.Size" est readonly.
Quelqu'un aurait-il une solution?

Merci d'avance

Il faut changer tout l'objet Font :

Code:

---

1 2 3

Dim oldFont As Font = lblLettre1.Font.Size Dim newFont As New Font(oldFont.FontFamily, oldFont.Size + 20, oldFont.Style) lblLettre1.Font = newFont

---

Merci pour ta réponse mais l'instruction

Code:

---

Dim oldFont As Font = lblLettre1.Font.Size

---

me donne le message

Citation:

---

Impossible de convertir une valeur de type 'Single' en 'System.Drawing.Font'

---

Je voudrais redimensionner tous les labels.text de mon form par un For Each...

Citation:

---

Envoyé par freddyev

Merci pour ta réponse mais l'instruction "Dim oldFont As Font = lblLettre1.Font.Size" me donne le message
"Impossible de convertir une valeur de type 'Single' en 'System.Drawing.Font' "

---

Ah oui pardon, j'ai copié/collé un peu vite... enlève juste le .Size

Citation:

---

Envoyé par freddyev

Je voudrais redimensionner tous les labels.text de mon form par un For Each...

---

Pas la peine, change plutôt la Font de toute la fenêtre, ça changera aussi pour les contrôles enfants

Génial, ça marche :ccool: :lol: :D:chin:
Merci