30. september 2002 - 13:07 Der er 14 kommentarer og
1 løsning

set focus på en textbox

Jeg har en textbox der skal udfyldes med en dato. nu vil jeg checke at datoen er korrekt udfyldt. det gør jeg med "if isdate..." men hvis det er forkert skal den returnere til textboxen efter en fejl meddelelse..

Jeg har prøvet med "textbox.setfocus" men det virker ikke .. den går videre til næste textbox..

Any ideas..
Avatar billede bennytordrup Nybegynder
30. september 2002 - 13:09 #1
Hvor gør du det. Det vil være oplagt at udføre i TextBox_Validate, og der har du en cancel parameter.
30. september 2002 - 13:17 #2
Forklar lige nærmere - er det en færdig rutine jeg har overset??
Avatar billede bennytordrup Nybegynder
30. september 2002 - 13:19 #3
Det er et event på kontrollen, der bliver kaldt, hvis CausesValidation propertien er sat til True.
Avatar billede bennytordrup Nybegynder
30. september 2002 - 13:19 #4
Jeg går ud fra, at det er VB 6
30. september 2002 - 13:28 #5
Yes VB6 - hvor sætter du den property - den står ikke i mit property vindue
Avatar billede bennytordrup Nybegynder
30. september 2002 - 13:35 #6
Den dukker op som nummer 6 i property vinduet
30. september 2002 - 13:40 #7
Når den nu ikke står der, må det være fordi den skal enables et sted - hvor
Avatar billede bennytordrup Nybegynder
30. september 2002 - 13:41 #8
Hvad kontrol bruger du? Jeg har testet det med en TextBox kontrol i VB6, og der ER den med på listen som standard. Property'en skal IKKE enables nogle steder.
30. september 2002 - 14:02 #9
den almindelige editor i word
30. september 2002 - 15:38 #10
Det er den almindelige editor jeg er i venstgre hjørne under "properties" og har markeret textboxen. der er ikke den property du taler om.

Anyway Benny - hvad med det jeg egentlig spurgte om med "set focus"
Avatar billede mikker Nybegynder
30. september 2002 - 16:40 #11
Umiddelbart virker det her.

Private Sub Command1_Click()
Text2.SetFocus
End Sub




Private Sub Text2_LostFocus()
Text1.SetFocus
End Sub


- Mikker
Avatar billede mikker Nybegynder
30. september 2002 - 16:46 #12
Private Sub Text2_LostFocus()
If IsDate(Text2) = False Then
Text2.BackColor = vbRed
Text2.SetFocus
End If
If IsDate(Text2) = True Then
Text2.BackColor = vbWhite
End If
End Sub
Avatar billede martin_moth Mester
30. september 2002 - 17:53 #13
Og forfinet:

Private Sub Text2_LostFocus()
If IsDate(Text2) = False Then
  MsgBox "Båthoved - indtast en Dato" '<-- NY
  Text2.BackColor = vbRed
  Text2.SetFocus
  Text2.Selstart = 1                '<--NY
  Text2.Sellength = Len(text2.text)  '<--NY
End If
If IsDate(Text2) = True Then
  Text2.BackColor = vbWhite
End If
End Sub
05. december 2002 - 16:18 #14
Det fungerer fint - tak for det
Avatar billede mikker Nybegynder
05. december 2002 - 16:48 #15
Selv tak :O)
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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