[Mina Botros]

اريد كود لجعل الخط يكبر بمقدار 2 درجة او يصغر مقدار 2 درجة

[26094]

كود :

With Label1
    .Font=New Font(.Font.Name,.Font.Size+2)
End With

كود :

With Label1
    .Font=New Font(.Font.Name,.Font.Size-2)
End With