Keskustelu: Ohjelmointikysymykset: VB6: Liikuttaminen/napit?

Miten saan esim kun painaa nappia H niin joku kuva liikkuu vaikka ukko hyppää?

hmh... Q vai Visual basicci ?

Tässä vb:eelle esimerkki joka liikuttaa picture1 objektia oikealle H:oosta
'Pistä form1 propertieseista KeyPreview true arvoon..

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyH
Picture1.Left = Picture1.Left + 100
End Select
End Sub

Ja Antti Laaksoselle... miks toi tekee ton ' eteen "-merkin kuten tossa yllä ("'Pistä )... ärsyttävän näköseks menee..

' häh?

Joo, huomasin toi johtuu luultavasti (johtuu) siit et.. :)
en jaksa selittää!

Niin joo QB.

..ja vielä tosta Visual Basicista miten saa oikealle alas ja niin edelleen?

vbKeyRight Oikealle
vbKeyLeft Vasemmalle
vbKeyUp Ylös
vbKeyDown Alas

Melko selviä...

Siis...?

Siis nuo vbKeyH:n tilalle.

Etsi helpistä KeyCode niin saat kaikki keycode jutut..

Niin Laaksonen miksi tää foorumi iskee yläpilkun eteen lainausmerkin..

Esimerkki.. kirjoitan VAIN yläpilkun: ' mutta kuten huomaatte luultavasti siihen on eteen tullut lainausmerkki..

En oikeastaan itsekään tiedä. Harmittava bugi.

Vaihdoin, valittaa virheestä..

Private Sub Form_KeyDown(KeyCode as integer, shift as integer)
If KeyCode = vbKeyLeft then
ukko.left = ukko.left - 20
ElseIf KeyCode = vbKeyRight then
ukko.left = ukko.left + 20
ElseIf KeyCode = vbKeyUp then
ukko.top = ukko.top - 20
ElseIf KeyCode = vbKeyDown then
ukko.top = ukko.top + 20
End if
End Sub

kirjotin äkkiä eli en tiedä onko pukeja