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
Scova Codici Ascii - Form1.frm

Form1.frm

Caricato da: Natamas
Scarica il programma completo

  1. Private Sub Form_KeyPress(KeyAscii As Integer)
  2. Label1.Caption = "Il codice keyAscii è " & KeyAscii & Chr(13) & "Per scriverlo digitare Chr(" & KeyAscii & ")"
  3. End Sub
  4.  
  5. Private Sub Form_Load()
  6. MsgBox "Software Freeware realizzato da Giuseppe Cazzato", vbInformation, "Info"
  7. Me.Caption = App.Title
  8. End Sub
  9.  
  10. Private Sub Form_Unload(Cancel As Integer)
  11. MsgBox "Software Freeware realizzato da Giuseppe Cazzato", vbInformation, "Info"
  12. Unload Me
  13. End Sub