/ 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
keypress
Fra : Thomas Loecke


Dato : 20-09-01 14:59

To spørgsmål:

1. Hvorfor kan jeg ikke bruge "form1.windowstate 2" under text1_keypress?
Jeg får en invalid use of property fejl.

2. Hvordan fanger man tastetryk når focus er på webbrowser1? Jeg har en
form1 med et text felt og en browser. Jeg vil gerne have det således at når
fokus forlader text1, feks. ved en webbrowser1.navigate URL, så skal fokus
springe tilbage til text1 straks jeg taster på keyboardet.

Håber nogen kan hjælpe.


Thomas





 
 
Jens (20-09-2001)
Kommentar
Fra : Jens


Dato : 20-09-01 16:25

Du skal også bruge keydown plus formen skal du skrive Form1.KeyPreview =
True


Option Explicit

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Text1.SetFocus

End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)

Text1.SetFocus

End Sub

Private Sub Form_Load()

WebBrowser1.Navigate "www.ni.dk"

Form1.KeyPreview = True

End Sub




Thomas Loecke (20-09-2001)
Kommentar
Fra : Thomas Loecke


Dato : 20-09-01 18:51

TUSIND TAK!!

Det må være form1.keypreview=true som gør tricket, for det er det eneste jeg
ikke har prøvet - jeg aner ikke engang hvad det betyder!

Måske du kunne forklare kort hvad keypreview egentlig gør?



Thomas Løcke


"Jens" <til@infojens.dk> skrev i en meddelelse
news:3baa0a3d$0$82072$edfadb0f@dspool01.news.tele.dk...
> Du skal også bruge keydown plus formen skal du skrive Form1.KeyPreview =
> True
>
>
> Option Explicit
>
> Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
>
> Text1.SetFocus
>
> End Sub
>
> Private Sub Form_KeyPress(KeyAscii As Integer)
>
> Text1.SetFocus
>
> End Sub
>
> Private Sub Form_Load()
>
> WebBrowser1.Navigate "www.ni.dk"
>
> Form1.KeyPreview = True
>
> End Sub
>
>
>



Rayman (25-09-2001)
Kommentar
Fra : Rayman


Dato : 25-09-01 16:45

Den sender eventet Keypress til formen, før den sendes til den aktive
control.

"Thomas Loecke" <vendetta@avenging-nerds.dk> skrev i en meddelelse
news:3baa2bb4$0$51401$edfadb0f@dspool01.news.tele.dk...
> TUSIND TAK!!
>
> Det må være form1.keypreview=true som gør tricket, for det er det eneste
jeg
> ikke har prøvet - jeg aner ikke engang hvad det betyder!
>
> Måske du kunne forklare kort hvad keypreview egentlig gør?
>
>
>
> Thomas Løcke
>
>
> "Jens" <til@infojens.dk> skrev i en meddelelse
> news:3baa0a3d$0$82072$edfadb0f@dspool01.news.tele.dk...
> > Du skal også bruge keydown plus formen skal du skrive Form1.KeyPreview =
> > True
> >
> >
> > Option Explicit
> >
> > Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
> >
> > Text1.SetFocus
> >
> > End Sub
> >
> > Private Sub Form_KeyPress(KeyAscii As Integer)
> >
> > Text1.SetFocus
> >
> > End Sub
> >
> > Private Sub Form_Load()
> >
> > WebBrowser1.Navigate "www.ni.dk"
> >
> > Form1.KeyPreview = True
> >
> > End Sub
> >
> >
> >
>
>



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

Månedens bedste
Årets bedste
Sidste års bedste