Notifikationer

Markér alle som læst Log ud

hiks Nybegynder

14. oktober 2003 - 18:48 Der er 7 kommentarer og
1 løsning

Fortsat Keypress

Hej

Er rendt i et mindre problem! Jeg skal loade en form på et bestemt keypress eksempelvis F1. Derved skal jeg loade en ny form som skal vises ligeså længe som F1 er holdt nede...

Det vil altså sige når jeg slipper F1-tasten skal den form så forsvinder og fokus på den gamle...

På forhånd tak!

/hiks

Synes godt om

stry Nybegynder

14. oktober 2003 - 18:51 #1

F1 har keycode 112

Synes godt om

stry Nybegynder

14. oktober 2003 - 18:54 #2

Måske sådan her:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 112 Then
Load (DinForm)
End Sub

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
Unload (DinForm)
End Sub

Synes godt om

hiks Nybegynder

14. oktober 2003 - 18:54 #3

I know

men hvordan finder man ud af når man har loadet formen om F1 stadig er trykket ned - det vil sige ikke sluppet!

/hiks

Synes godt om

stry Nybegynder

14. oktober 2003 - 18:56 #4

Brug KeyDown og KeyUp.

Synes godt om

hiks Nybegynder

14. oktober 2003 - 19:00 #5

det gør jeg lige pt. men jeg er nødt til at åbne min form således:

keydown:
select case keycode
case 112
frm2.show vbmodal
end select

keyup:
select case keycode
case 112
unload frm2
end select

- og det virker ikke!

Synes godt om

hiks Nybegynder

14. oktober 2003 - 19:01 #6

stort - jeg er med! Sorry lidt små forvirret her sidst på dagen...

takker for hjælp!

/hiks

Synes godt om

kabbak Professor

14. oktober 2003 - 19:05 #7

iVBA således
Form 1

Private Sub UserForm_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 112 Then UserForm2.Show
End Sub

form 2

Private Sub UserForm_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 112 Then UserForm2.Hide

End Sub

Synes godt om

stry Nybegynder

14. oktober 2003 - 19:05 #8

Selv tak :-)

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic	5	29/08/202512:28	04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic	0	05/08/202510:10	-
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic	0	16/05/202512:31	-
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic	1	22/04/202514:55	25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic	12	10/07/202417:34	12/07/202414:34

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS