19/03/2004, 03:56
|
| Usuario no validado | | Fecha de Ingreso: marzo-2004 Ubicación: Barna
Mensajes: 18
Antigüedad: 21 años, 1 mes Puntos: 0 | |
| Hola de nuevo,
he encontrado una solución, así que me respondo yo mismo.
Para cada formulario, se debe ejecutar el siguiente código:
For I = 0 To Controls.Count - 1
If Not TypeOf Controls(I) Is Menu Then
Controls(I).Font = New System.Drawing.Font("Comic Sans MS", 12.0F)
End If
Next I
Aqui se cambia todo de fuente excepto los menús.
Saludos,
--------------------
Chimo |