[VB.net] Vanuit Multiline textbox selectnextcontrol

[Cai]

Situatie:
In een windows form applicatie staan 20 textfields onder elkaar. Door op de pijltjes toetsen te drukken kan de gebruiker naar boven en naar benenden scrollen.

code:

Select Case e.KeyCode
                Case 27 'ESC
                    Me.Close()
                Case 38 ' Omhoog
                    Me.SelectNextControl(Me.ActiveControl, False, True, True, True)

                Case 40 ' Omlaag
                    Me.SelectNextControl(Me.ActiveControl, True, True, True, True)
End Select

Probleem
Dit werkt alleen met single-line textfield. Wanneer ik er een mltiline textfield tussenplaats werkt het niet meer. Het multiline textfield blijft geselecteerd.

Met debuggen getest of de case constructie goed blijft gaan. Dat is het geval. De volgende codes geprobeerd.

code:

SendKeys.Send("{TAB}")

Een tabtoets nadoen, want door op de TAB toets te drukken verlaat het textfield wel de select en gaat automatisch naar het volgende textfield. Dit werkt niet

code:

Textbox20.select()

Een aparte event listener aangemaakt voor het textfield. Ook dit werkt niet.

code:

textbox20.focus()

Helaas.

Wanneer ik de multiline property op false zet, werkt het als een trein. Het textfield moet echter (helaas) multiline zijn.

[Face_-_LeSS]

Je moet aangeven dat de keydown afgehandeld is dmv:

Visual Basic .NET:

Select Case e.KeyCode
                Case 27 'ESC
                    Me.Close()
                Case 38 ' Omhoog
                    Me.SelectNextControl(Me.ActiveControl, False, True, True, True)
                    e.Handled = True

                Case 40 ' Omlaag
                    Me.SelectNextControl(Me.ActiveControl, True, True, True, True)
                    e.Handled = True
End Select

[ Voor 67% gewijzigd door Face_-_LeSS op 09-12-2008 13:17 ]

[Cai]

Face_-_LeSS schreef op dinsdag 09 december 2008 @ 13:17:
Je moet aangeven dat de keydown afgehandeld is dmv:

Visual Basic .NET:

Select Case e.KeyCode
                Case 27 'ESC
                    Me.Close()
                Case 38 ' Omhoog
                    Me.SelectNextControl(Me.ActiveControl, False, True, True, True)
                    e.Handled = True

                Case 40 ' Omlaag
                    Me.SelectNextControl(Me.ActiveControl, True, True, True, True)
                    e.Handled = True
End Select

Thank you

[RobIII]

Los daarvan vraag ik me een beetje af of deze situatie wel gewenst is; in oude DOS applicaties waren pijltoetsen nog wel gangbaar, maar in Windows applicaties is TAB de juiste toets om de focus naar de volgende control te sturen; interfacetechnisch en standaards-wise wil je daar eigenlijk liever niet aan rommelen en je gebruikers verkeerde zaken aanleren. Het is niet voor niets dat je "gekke dingen" moet gaan uithalen om het werkend te krijgen

[Snake]

Met ^^.

Enige wat je kan implementeren is de tabvolgorde, moest die niet juist staan