Keskustelu: Ohjelmointikysymykset: VB6: Miten laitetaan nuolinäppäimet?

ossi.heino1991 [23.09.2003 08:53:42]

Miten Visual Basicilla (6.0) voi laittaa esim. ylöspäin nuoli näppäin tapahtuu jotain ja niin eespäin?

Antti Laaksonen [23.09.2003 10:38:06]

Laita formin KeyPreview-asetuksen arvoksi True ja kirjoita tämä koodi Form_KeyDown-aliohjelmaan:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = vbKeyUp Then
        MsgBox "Painoit ylöspäin-nuolta!"
    End If
End Sub

Lisätietoja:

https://www.ohjelmointiputka.net/oppaat/opas.php?tunnus=napk
https://www.ohjelmointiputka.net/oppaat/opas.php?tunnus=vbo_6

Teme [24.09.2003 13:27:42]

Jep.. Ja sama hoituu myös näin:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
  Select Case KeyCode
  Case vbKeyUp
    MsgBox "Painoit ylöspäin"
  Case vbKeyDown
    MsgBox "Painoit alaspäin"
  Case vbKeyLeft
    MsgBox "Painoit vasemmalle"
  Case vbKeyRight
    MsgBox "Painoit oikealle"
  End Select
End Sub

Edit: Typo

ossi.heino1991 [24.09.2003 16:39:22]

Kiitos, noita juuri tarvitsinkin!

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Kirjautuminen