codice:
Private Sub Combo2_Click()
  Text1.FontSize = Combo2.Text
End Sub



Private Sub Form_Load()
Dim i, a, c


  For a = 1 To 50 Step 1
    Combo2.AddItem a
  Next
Combo1.ListIndex = 0
Combo2.ListIndex = 0

End Sub
il for assegna dei valori da 1 a 50 a un combobox
poi al click su questo combo viene modificato il fontsize di un textbox,il problema è che la grandezza del font dal valore 1 al 16 rimare uguale !! Per poi cambiare in modo impressionante al 17 !! Perchè?? :master: