|
| ComboBox i focus Fra : Neo.dk |
Dato : 26-03-02 12:52 |
|
Hej alle
Hvordan "nulstiller" jeg en combobox ?
- altså stiller comboboxen til det første valg og med focus på comboboxen
ved f.eks. tryk på en knap.
Håber at der er en der vil hjælpe.
Tusind tak
Neo.dk
| |
Jens Vestergaard (26-03-2002)
| Kommentar Fra : Jens Vestergaard |
Dato : 26-03-02 13:44 |
|
"Neo.dk" <neo___dk@hotmail.com> skrev i en meddelelse
news:3ca060b1$0$72400$edfadb0f@dspool01.news.tele.dk...
> Hej alle
>
> Hvordan "nulstiller" jeg en combobox ?
>
> - altså stiller comboboxen til det første valg og med focus på comboboxen
> ved f.eks. tryk på en knap.
Kig på .SetFocus og/eller .TabIndex = 0 samt .ListIndex = 0
--
mvh
Jens Vestergaard
www.railsoft.dk
| |
Neo.dk (26-03-2002)
| Kommentar Fra : Neo.dk |
Dato : 26-03-02 14:06 |
|
> Kig på .SetFocus og/eller .TabIndex = 0 samt .ListIndex = 0
>
> --
> mvh
> Jens Vestergaard
> www.railsoft.dk
Hej igen Jens
Jeg synes at jeg har prøvet med .SetFocus
Private Sub Combo()
' formålet men denne sub er at nulstille Combo til det første valg
' og sætte Combo i focus
Combo.AddItem "valg1"
Combo.AddItem "valg2"
Combo.AddItem "valg3"
Combo.AddItem "valg4"
Combo.AddItem "valg5"
Combo.AddItem "valg6"
'Combo.ListIndex = 0
'Combo.TabIndex = 0
Combo.SetFocus
End Sub
Men jeg får følgende fejl:
Runtime error 5
invalid procedure call or argument.
og markering ved "Combo.SetFocus"
Har du en ide til hvad jeg gør galt ?
Mvh Neo.dk
| |
Jens Vestergaard (26-03-2002)
| Kommentar Fra : Jens Vestergaard |
Dato : 26-03-02 15:37 |
|
"Neo.dk" <neo___dk@hotmail.com> skrev i en meddelelse
news:3ca07212$0$72058$edfadb0f@dspool01.news.tele.dk...
> > Kig på .SetFocus og/eller .TabIndex = 0 samt .ListIndex = 0
> >
> > --
> > mvh
> > Jens Vestergaard
> > www.railsoft.dk
>
> Hej igen Jens
>
<objekt>.SetFocus giver fejl, hvis ikke formen, hvor <objekt> er på er
synlig - typisk, hvis man prøver SetFocus i Load-eventen.
Måske er der er sammenhæng til dit problem?
--
mvh
Jens Vestergaard
www.railsoft.dk
| |
Neo.dk (26-03-2002)
| Kommentar Fra : Neo.dk |
Dato : 26-03-02 16:01 |
|
> <objekt>.SetFocus giver fejl, hvis ikke formen, hvor <objekt> er på er
> synlig - typisk, hvis man prøver SetFocus i Load-eventen.
>
> Måske er der er sammenhæng til dit problem?
>
> --
> mvh
> Jens Vestergaard
> www.railsoft.dk
Hej Jens
Jeg tror at jeg fandt løsningen/en løsning på problemet - læs mit svar på
Raymans post
Tusind tak for hjælpen !!!
Mvh Neo.dk
| |
Rayman (26-03-2002)
| Kommentar Fra : Rayman |
Dato : 26-03-02 14:03 |
|
Combo1.Listindex = 1
Combo1.SetFocus
Eller måske Combo1.ListIndex = -1 (ingen valgt)
Mvh. Rayman.
"Neo.dk" <neo___dk@hotmail.com> wrote in message
news:3ca060b1$0$72400$edfadb0f@dspool01.news.tele.dk...
> Hej alle
>
> Hvordan "nulstiller" jeg en combobox ?
>
> - altså stiller comboboxen til det første valg og med focus på comboboxen
> ved f.eks. tryk på en knap.
>
> Håber at der er en der vil hjælpe.
>
> Tusind tak
>
> Neo.dk
>
>
| |
Neo.dk (26-03-2002)
| Kommentar Fra : Neo.dk |
Dato : 26-03-02 14:40 |
|
"Rayman" <rayman_dk@email.com> skrev i en meddelelse
news:uk_n8.335$567.58677@news000.worldonline.dk...
> Combo1.Listindex = 1
> Combo1.SetFocus
>
> Eller måske Combo1.ListIndex = -1 (ingen valgt)
>
> Mvh. Rayman.
Hej Rayman
Ja så lykkedes det, men problemet lå et andet sted end jeg havde forventet.
givet: 1 knap og 1 combo
ved tryk på knap kaldtes følgende:
Private Sub Combo()
' formålet men denne sub er at nulstille Combo til det første valg
' og sætte Combo i focus
Combo.AddItem "valg1"
Combo.AddItem "valg2"
Combo.AddItem "valg3"
Combo.AddItem "valg4"
Combo.AddItem "valg5"
Combo.AddItem "valg6"
Combo.ListIndex = 0
Combo.SetFocus
End Sub
Private Sub TilføjKnap_Click()
call Combo
End Sub
men dette gav fejl !
men det virker nu med følgende fremgangsmåde:
Private Sub Combo()
' formålet men denne sub er at nulstille Combo til det første valg
' og sætte Combo i focus
Combo.AddItem "valg1"
Combo.AddItem "valg2"
Combo.AddItem "valg3"
Combo.AddItem "valg4"
Combo.AddItem "valg5"
Combo.AddItem "valg6"
End Sub
Private Sub TilføjKnap_Click()
Combo.SetFocus
Combo.ListIndex = 0
End Sub
Kan du forklare hvorfor jeg fik fejl ?
Mvh Neo.dk
| |
Rayman (29-03-2002)
| Kommentar Fra : Rayman |
Dato : 29-03-02 12:27 |
|
Øhh, næh. Men det er rigtigt at du ikke kan sætte focus, når controllen ikke
er synlig/enabled. Det eneste der er at gøre ved det, er en 'On Error Resume
Next' eller måske flytte koden til 'Activate' Eventet. Derudover, skal du
lige huske at bruge en 'Clear' før du tilføjer elementer, eller bliver de
bare tilføjet til enden af listen.
Og så lige for at opklare det med TabIndex, så er det ikke noget der styrer
kontrollen, men det er rækkefølgen af elementerne, når man bruger Tab tasten
i stedet for musen. Og den bliver også brugt nå en Label har en HotKey dvs.
et understreget bogstav. Her kan label'en ikke få focus, men den giver i
stedet focus til den næste kontrol i TabIndex rækkefølgen.
Mvh. Rayman
"Neo.dk" <neo___dk@hotmail.com> wrote in message
news:3ca079f6$0$88692$edfadb0f@dspool01.news.tele.dk...
>
> "Rayman" <rayman_dk@email.com> skrev i en meddelelse
> news:uk_n8.335$567.58677@news000.worldonline.dk...
> > Combo1.Listindex = 1
> > Combo1.SetFocus
> >
> > Eller måske Combo1.ListIndex = -1 (ingen valgt)
> >
> > Mvh. Rayman.
>
> Hej Rayman
>
> Ja så lykkedes det, men problemet lå et andet sted end jeg havde
forventet.
>
> givet: 1 knap og 1 combo
>
> ved tryk på knap kaldtes følgende:
>
> Private Sub Combo()
> ' formålet men denne sub er at nulstille Combo til det første valg
> ' og sætte Combo i focus
> Combo.AddItem "valg1"
> Combo.AddItem "valg2"
> Combo.AddItem "valg3"
> Combo.AddItem "valg4"
> Combo.AddItem "valg5"
> Combo.AddItem "valg6"
> Combo.ListIndex = 0
> Combo.SetFocus
> End Sub
>
> Private Sub TilføjKnap_Click()
> call Combo
> End Sub
>
> men dette gav fejl !
>
> men det virker nu med følgende fremgangsmåde:
>
> Private Sub Combo()
> ' formålet men denne sub er at nulstille Combo til det første valg
> ' og sætte Combo i focus
> Combo.AddItem "valg1"
> Combo.AddItem "valg2"
> Combo.AddItem "valg3"
> Combo.AddItem "valg4"
> Combo.AddItem "valg5"
> Combo.AddItem "valg6"
> End Sub
>
> Private Sub TilføjKnap_Click()
> Combo.SetFocus
> Combo.ListIndex = 0
> End Sub
>
> Kan du forklare hvorfor jeg fik fejl ?
>
> Mvh Neo.dk
>
>
>
| |
Neo.dk (30-03-2002)
| Kommentar Fra : Neo.dk |
Dato : 30-03-02 21:47 |
|
Tusind tak for dit svar Rayman !
Neo.dk
"Rayman" <rayman_dk@email.com> skrev i en meddelelse
news:EcYo8.2589$567.158175@news000.worldonline.dk...
> Øhh, næh. Men det er rigtigt at du ikke kan sætte focus, når controllen
ikke
> er synlig/enabled. Det eneste der er at gøre ved det, er en 'On Error
Resume
> Next' eller måske flytte koden til 'Activate' Eventet. Derudover, skal du
> lige huske at bruge en 'Clear' før du tilføjer elementer, eller bliver de
> bare tilføjet til enden af listen.
> Og så lige for at opklare det med TabIndex, så er det ikke noget der
styrer
> kontrollen, men det er rækkefølgen af elementerne, når man bruger Tab
tasten
> i stedet for musen. Og den bliver også brugt nå en Label har en HotKey
dvs.
> et understreget bogstav. Her kan label'en ikke få focus, men den giver i
> stedet focus til den næste kontrol i TabIndex rækkefølgen.
>
>
> Mvh. Rayman
>
>
> "Neo.dk" <neo___dk@hotmail.com> wrote in message
> news:3ca079f6$0$88692$edfadb0f@dspool01.news.tele.dk...
> >
> > "Rayman" <rayman_dk@email.com> skrev i en meddelelse
> > news:uk_n8.335$567.58677@news000.worldonline.dk...
> > > Combo1.Listindex = 1
> > > Combo1.SetFocus
> > >
> > > Eller måske Combo1.ListIndex = -1 (ingen valgt)
> > >
> > > Mvh. Rayman.
> >
> > Hej Rayman
> >
> > Ja så lykkedes det, men problemet lå et andet sted end jeg havde
> forventet.
> >
> > givet: 1 knap og 1 combo
> >
> > ved tryk på knap kaldtes følgende:
> >
> > Private Sub Combo()
> > ' formålet men denne sub er at nulstille Combo til det første valg
> > ' og sætte Combo i focus
> > Combo.AddItem "valg1"
> > Combo.AddItem "valg2"
> > Combo.AddItem "valg3"
> > Combo.AddItem "valg4"
> > Combo.AddItem "valg5"
> > Combo.AddItem "valg6"
> > Combo.ListIndex = 0
> > Combo.SetFocus
> > End Sub
> >
> > Private Sub TilføjKnap_Click()
> > call Combo
> > End Sub
> >
> > men dette gav fejl !
> >
> > men det virker nu med følgende fremgangsmåde:
> >
> > Private Sub Combo()
> > ' formålet men denne sub er at nulstille Combo til det første valg
> > ' og sætte Combo i focus
> > Combo.AddItem "valg1"
> > Combo.AddItem "valg2"
> > Combo.AddItem "valg3"
> > Combo.AddItem "valg4"
> > Combo.AddItem "valg5"
> > Combo.AddItem "valg6"
> > End Sub
> >
> > Private Sub TilføjKnap_Click()
> > Combo.SetFocus
> > Combo.ListIndex = 0
> > End Sub
> >
> > Kan du forklare hvorfor jeg fik fejl ?
> >
> > Mvh Neo.dk
> >
> >
> >
>
>
| |
|
|