spatie en hoofdletter niet doen

[m4dc0w344]

hallo,
is er een code waar door ie de "spatie"en hoofdleters niet metelen en de hoofdletters worden gezien als kleine letters.

alfast bedankt

 

[edmoor]

In welke context?

 

[m4dc0w344]

ik weet neit wat je prezies bedoelt
maar stel je typt in texbox1 HaLoOoO
dat hij alle hoofdletter ziet als kleine leters

als je in textbox1 h a l o o o typt dat ie het leest als haloo

 

[edmoor]

Dat bedoel ik dus. De context is het typen van tekst in een textbox.
Dan kun je in het Change event van de textbox de spatie uitsluiten en hoofdletters converteren naar kleine letters, dit alles tijdens het typen.
Ik heb er nu geen tijd voor maar als je morgen niet van iemand anders een voorbeeldcode hebt gekregen zal ik die wel maken voor je.

 

[JoZ1]

Dat hoeft niet eens in het ChangeEvent van de TextBox. In de TextBox zelf mogen de spaties en hoofdletters immers gewoon blijven staan, of niet?

Voorbeeld van hoe je de tekst moet aanpassen:
[cpp]Dim tekst As String = TextBox1.Text.ToLower.Replace(" ", "")[/cpp]

 

[edmoor]

Als je controle wilt over ieder teken dat wordt ingetikt zou je dit kunnen doen:

Private Sub TextBox1_Change()
    Dim i As Long
    Dim Tekst As String
    
    For i = 1 To Len(TextBox1.Text)
        Select Case Asc(Mid(TextBox1.Text, i, 1))
        Case 32         'Uitsluiten spatie
        Case 65 To 92   'Hoofdletter omzetten naar kleine letter
            Tekst = Tekst & Chr(Asc(Mid(TextBox1.Text, i, 1)) + 32)
        Case Else
            Tekst = Tekst & Mid(TextBox1.Text, i, 1)
        End Select
    Next
    TextBox1.Text = Tekst
End Sub

 

[JoZ1]

Dan moet

TextBox1 = Tekst

natuurlijk

TextBox1.Text = Tekst

zijn

 

[edmoor]

Dat kan. Maar bij alleen TextBox1 is het attribuut Text de default.
Het is inderdaad netter om het voluit te schrijven.

 

[JoZ1]

Ik krijg er anders een foutmelding bij

 

[edmoor]

Ok.
Ik had 'm ff snel in VBA gemaakt.
In VB moet je het inderdaad wel mee geven en we zitten in de VB sectie.
Ik pas het voorbeeld wel even aan.

Goed opgelet JoZ1

 

[JoZ1]

No problemo

 

[m4dc0w344]

heej
wel grapig dat jullie een diskuzie hebben maar,
waar meot ik dat plaatsen dan.

 

[JoZ1]

Wij weten toch niet waarvoor je het gaat gebruiken?
En we weten ook niet of je wél hoofdletters en spaties in je TextBox wil of niet.

Als je dit invoert in je TextBox: H a L l OO
En je gebruikt deze code:

[cpp]MsgBox(TextBox1.Text.ToLower.Replace(" ", ""))[/cpp]

Zal je een popup met: halloo krijgen.
Snap je?

 

[m4dc0w344]

ik srry voor de weinig info
ik ben een engelse quiz aan het maken (eigenlijk meer een overhoor programma) maar als je peronglijk een spatie doet bij dan word ie fout gerekent, en somigen typen met hoofdletters en sommige niet.
eigenlijk dat ie spatie negeert en hoofdletters kleine leter automaatisch maakt.

 

[edmoor]

Plaats mijn voorbeeld in het OnChange event van de Textbox

    Dim i As Long
    Dim Tekst As String
    
    For i = 1 To Len(TextBox1.Text)
        Select Case Asc(Mid(TextBox1.Text, i, 1))
        Case 32         'Uitsluiten spatie
        Case 65 To 92   'Hoofdletter omzetten naar kleine letter
            Tekst = Tekst & Chr(Asc(Mid(TextBox1.Text, i, 1)) + 32)
        Case Else
            Tekst = Tekst & Mid(TextBox1.Text, i, 1)
        End Select
    Next
    TextBox1.Text = Tekst

 

[m4dc0w344]

srry maar ik weet niet wat onchange event is/zijn
ben echt nie met VB

 

[JoZ1]

Het is een manier om het in het TextChanged Event te plaatsen, maar dat lijkt me niet handig. Elke keer dat je een letter intypt, gaat-ie van alles aanpassen. Daar zou ik niet zo blij mee zijn als gebruiker van de quiz.

Post je code voor het controleren van het antwoord eens, dan zal ik 't wel voor je aanpassen.

 

[edmoor]

Die code past alleen dat aan wat werd gevraagd.

 

[JoZ1]

Die van mij ook

Alleen die past het niet gelijk tijdens het typen aan, maar bij het opvragen van de tekst in de TextBox. Ik denk dat dat in dit geval handiger (en minder code) is, toch?

 

[edmoor]

We laten het aan TS over, hij heeft zo een paar mogelijkheden