Ascii ----> INVIO

[sara81it]

Come intercetto il tasto invio con il codice ascii?

ho guardato le tabelle, ma non trovo l'invio!!

Grazie Sara

[darkblOOd]

Originariamente inviato da sara81it
Come intercetto il tasto invio con il codice ascii?

ho guardato le tabelle, ma non trovo l'invio!!

Grazie Sara

infatti non c'è :tongue: è prima del 30, dovrebbe essere il chr(13)

(oppure il 10)


cmq in vb dovresti trovarlo anche com VbCr (oppure il + completo VbCrLf, ma dipende cosa devi fare)

[sara81it]

Private Sub ListView1_KeyPress(KeyAscii As Integer)
If KeyAscii = Chr(10) Then
variabile = ListView1.SelectedItem.Text
FrmModificaCliente.Show
Unload Me
End If
End Sub

io vorrei fare in modo che solo se clicco invio esegua le operazioni successive..

ma non funziona come devo fare?
:quipy:

[sara81it]

Trovato!!! 13!!


ascolta, io carico una listview .
i campi sono ID, cliente etc...

vorrei che se cliccassi sulla C mi si posiziona sulla prima riga del cliente che inizia con C. ma non funziona perchè ho il campo id che mi serva per il checedboxes.

qualche idea??

[darkblOOd]

Originariamente inviato da sara81it

Private Sub ListView1_KeyPress(KeyAscii As Integer)
If KeyAscii = Chr(10) Then
variabile = ListView1.SelectedItem.Text
FrmModificaCliente.Show
Unload Me
End If
End Sub

io vorrei fare in modo che solo se clicco invio esegua le operazioni successive..

ma non funziona come devo fare?
:quipy:

Private Sub ListView1_KeyPress(KeyAscii As Integer)
   If KeyAscii = VbCrLf Then
      variabile = ListView1.SelectedItem.Text
      FrmModificaCliente.Show
      Unload Me
   End If
End Sub

[xegallo]

vbkeyenter