Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Lista Font - Lista Font.frm

Lista Font.frm

Caricato da: Roberto VB
Scarica il programma completo

  1. Private Sub Command1_Click()
  2. Dim i As Integer
  3. For i = 0 To Screen.FontCount - 1
  4. lstFonts.AddItem Screen.Fonts(i)
  5. Next
  6. End Sub
  7.  
  8.  
  9. Private Sub Form_Unload(Cancel As Integer)
  10. MsgBox "By Roberto VB - 17/13/2007"
  11. End Sub