[ Visual Basic ] Avvio Evento con Tasti Rapidi [Archivio]

View Full Version : [ Visual Basic ] Avvio Evento con Tasti Rapidi

Genymus

17-05-2008, 21:29

Salve,
Dovrei attivare un evento di lettura di file quando premo ALT+F10:

Avvio Applicazione --> |Bottone "Leggi File"| -> |Pressione di ALT + F10| -> Lettura del file

Grazie

albySR

20-07-2008, 19:36

interesserebbe anche a me...

ho googlato un po...

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF10 Then ...
End Sub

nn so alt + f10 come funziona però meglio di niente

Genymus

21-07-2008, 16:08

e per Invio?
Cioè: Premo "Invio" sulla tastiera e eseguo un evento?

22-07-2008, 18:51

Non capisco bene la doppia istruzione dell' "(Alt + F10) e (Leggi File)", secondo me, una volta cliccato sul Bottone "Leggi File" si aprirà il File da leggere e stop, oppure solo (Alt + F10) senza l'ulteriore Bottone "Leggi File" e ancora meglio, solo F10 senza l'Alt. :)

Genymus

22-07-2008, 23:28

no mi sono spiegato male:
volevo dire che, cliccando sul bottone "Leggi File" o premendo i tasti "Alt + F4" si apre il file da leggere.
Non intendevo che prima si deve premere il bottone e poi premeri i tasti.
comunque per "Invio" come devo fare?

23-07-2008, 04:55

Intendevi questo ? :)

Private Sub CmdBottone_Click()
CmdLeggiFile.Value = True
End Sub

Non avrebbe bisogno di ulteriori spiegazioni.

Hai un CommandButton che genera un evento Click,
Premendolo viene attivato il CmdLeggiFile che conterrà
la routine da eseguire.

Oppure come ha proposto AlbySR...

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF10 Then
CmdLeggiFile.Value = True
Else
End If
End Sub

però questa routine non l'ho mai provata :O

Spero di aver capito bene :D

Ciao

Genymus

23-07-2008, 10:14

Si ma per utilizzare il tasto invio devo usare questo codice?
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyEnter Then
'Cose da fare
End If
End Sub

24-07-2008, 20:06

Dovresti chiarire meglio cosa intendi fare, in quale contesto si trova il Bottone per avviare il programma.

Io ho capito che vuoi avviare un'altra applicazione in VB6 premendo un tasto CommandButton partendo da un programma diverso da quello in cui si trova il programma da avviare, sicuramente non ho capito bene. :D

Il codice che segue (dovrebbe) avviare CmdLeggiFile premendo il tasto Enter ma, tale codice deve essere incluso in un programma in VB6.

Ho usato il condizionale perchè il codice non l'ho provato.

Si ma per utilizzare il tasto invio devo usare questo codice?

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyEnter Then
CmdLeggiFile.Value = True
End If
End Sub

Mah! :) chiarisci chiarisci :D

Il programma che dovrà avviarsi si troverà all'interno del bottone CmdLeggiFile.