
25/10/2006, 05:27
|
 | | | Fecha de Ingreso: septiembre-2005
Mensajes: 317
Antigüedad: 19 años, 7 meses Puntos: 1 | |
perdonad la estupidez, pensaba q era más complicado Solución:
Código:
Public Sub CambiarTamanno()
Dim x As Integer
x = 18
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", x, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Font = New System.Drawing.Font("Verdana", x, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
End Sub
|