Notifikationer

Markér alle som læst Log ud

butcher Nybegynder

14. december 2003 - 16:26 Der er 6 kommentarer og
1 løsning

Kun brug af bostaver i et text felt

Hvordan tvinger man folk til KUN at bruge bogstaver i et tekstfelt når der skal søges eller tilføjes til en database.

Jeg havde prøvet lidt med:

If Not IsCharAlpha(input.Text) Then
tilbage = MsgBox(Prompt:="Fejl", Title:="Advarsel", Buttons:=vbOKOnly + vbExclamation)
input.Text = ""

Men det kan man åbenbart ikke, nogle ideer her?

Synes godt om

thesurfer Nybegynder

14. december 2003 - 16:53 #1

Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 65 To 90 ' A-Z, fortsæt
Case 97 To 122 ' a-z, forsæt
Case Else ' hverken A-Z eller a-z
KeyAscii = 0 ' fjen tegnet
End Select
End Sub

Synes godt om

thesurfer Nybegynder

14. december 2003 - 16:54 #2

Erstat mit "Text1" med dit "input".

Synes godt om

thesurfer Nybegynder

14. december 2003 - 16:55 #3

Hvis du vil vise en fejlmeddelse, erstatter du "KeyAscii = 0" med din msgbox.

Synes godt om

thesurfer Nybegynder

14. december 2003 - 17:03 #4

Hvis du vil ha æøå, ÆØÅ med:

Case 230, 248, 229, 198, 216, 197 ' Æ-Å, æ-å
Case Else ' hverken A-Z eller a-z

Info:
æ=230
ø=248
å=229
Æ=198
Ø=216
Å=197

Synes godt om

butcher Nybegynder

15. december 2003 - 00:01 #5

Mange tak, jeg tager et kig på det i morn :)

Synes godt om

butcher Nybegynder

15. december 2003 - 08:43 #6

Yes det virker perfekt, jeg udvidede det lidt, så man også kunne bruge backspace samt space :)

Synes godt om

thesurfer Nybegynder

15. december 2003 - 16:27 #7

Du er velkommen til at ændre det lige så meget du vil :)
Jeg siger tak for points :)

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