/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
command1 og tastetryk
Fra : Thomas Løcke


Dato : 08-08-02 09:19

Hej NG,

Jeg har en knap, command1, som jeg gerne vil kunne trykke på via et
tastetryk. Hvordan gør man det?

Jeg har siddet og luret på noget keycode halløj, men jeg kan ikke rigtig
finde ud af at få overført tastetrykket til knappen.

Nogen der kan assistere?

Mvh
Thomas



 
 
Thomas Løcke (08-08-2002)
Kommentar
Fra : Thomas Løcke


Dato : 08-08-02 09:42

Lige en uddybning: Jeg kan ikke bruge & tricket i knappens caption, da jeg
skal bruge knap 5 på numpad for at aktivere den - jeg vil helst undgå at
skulle trykke på ALT+5. Ydermere hedder knappen noget helt andet, så at
indsætte et 5 tal i caption er nok ikke det kønneste.

Måske løsningen ligger i noget sendkeys?

Hmmmm..

Thomas



"Thomas Løcke" <thomas@responsum.dk> skrev i en meddelelse
news:3d522991$1@news.wineasy.se...
> Hej NG,
>
> Jeg har en knap, command1, som jeg gerne vil kunne trykke på via et
> tastetryk. Hvordan gør man det?
>
> Jeg har siddet og luret på noget keycode halløj, men jeg kan ikke rigtig
> finde ud af at få overført tastetrykket til knappen.
>
> Nogen der kan assistere?
>
> Mvh
> Thomas
>
>



Lars Hoffmann (08-08-2002)
Kommentar
Fra : Lars Hoffmann


Dato : 08-08-02 09:47

"Thomas Løcke" <thomas@responsum.dk> escribió

> Måske løsningen ligger i noget sendkeys?

I din form sætter du KeyPrewiev til true og indsætter følgende kode:

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

Det skulle klare tricket



Thomas Løcke (08-08-2002)
Kommentar
Fra : Thomas Løcke


Dato : 08-08-02 13:07

Det virker!

Tak for hjælpen Lars.. Genialt!



Thomas


"Lars Hoffmann" <lars@intercambiodvd.com> skrev i en meddelelse
news:aitb7e$ijo$1@newsreader.mailgate.org...
>
> I din form sætter du KeyPrewiev til true og indsætter følgende kode:
>
> Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
> If KeyCode = 101 Then
> Command1.Value = True
> End If
> End Sub
>
> Det skulle klare tricket




Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408926
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste