validatieregel

[gebo51]

Beste forumlezers,

Ik heb een simpele vraag(denk ik) maar krijg het niet voorelkaar.

In een tekstvak (telefoonnummer) heb ik het volgende invoermasker geplaatst:
00000000009999;0;_

Gebruikers moeten in elk geval 10 cijfers invoeren (het aantal bij nederlandse nummers) maar mogen ook meer cijfers invoeren (bij bijv. een duits tel. nummer)

Nu is het de bedoeling dat als een gebruiker een telefoonnummer invoert met meer dan 10 cijfers er een tekst verschijnt, waarin wordt aangegeven dat het een buitenlands nummer betreft.

De tekst doe ik met de 'validatietekst' maar de 'validatieregel' krijg ik niet voorelkaar.
Ik had ingevoerd >10 maar dat werkt dus niet.

Wie helpt me even....
Bedankt maar weer.

 

[Cotje]

Je moet eerst je integer converteren naar een string. Vervolgens kan je daar de lengte van laten weergeven. Bijvoorbeeld:

dim nummer as integer
dim validatie as string

nummer = textbox.text
validatie = convert.tostring(nummer)

if validatie.lenght > 10 then
  ' hier dan iets doen
endif

 

[gebo51]

Bedankt voor je antwoord.
Ik heb het inmiddels opgelost door -na bewerken- de volgende regel te plaatsen:


If Len(Me.[Telefoonnummer]) <> 10 Then
MsgBox " bericht", vbQuestion, "naam van het bedrijf"
End If

End Sub