Aantal karakters invoer Niet afhankleijk tekstveld in formulier bepalen

Status
Niet open voor verdere reacties.

GerbenDenker

Gebruiker
Lid geworden
29 mrt 2013
Berichten
74
Hallo,
Is het mogelijk, en zo ja, heeft iemand daar de code voor om bij de invoer van een niet afhankelijk tekstveld in een formulier een bepaalde maximale breedte te geven.

Ik bedoel het volgende.
Met behulp van een formulier maak ik gegevens aan om die via een rapport af te drukken.
De gegevens dat tekstveld worden getypt en worden niet opgeslagen in een tabel (wel afgedrukt) in het rapport - overigens laat ik het rapport direct opslaan als een pdf -.
Het tekstveld waarin ik de omschrijving zet, wil ik een bepaald maximum geven.
Bijvoorbeeld dat je maar 100 tekens er in kunt zetten en daarna niets meer.
Dat wil ik zo omdat ik anders met de rapportindeling in de knoei kom en voorkom je dat de omschrijving (gegevens van het tekstveld) maar half vermeld wordt.
Vergelijk het met het instellen van een veldlengte van een tabel veld.
Is dat mogelijk en is er een code voor ?
 
Is niet zo lastig; dat kun je afvangen bij de Change event van het tekstvak.
Code:
Private Sub Description_Change()
Const MaxLen As Integer = 10

    If Len(Me.Description.Text) > MaxLen Then
        Me.Description.Text = left(Me.Description.Text, Len(Me.Description.Text) - 1)
        Me.Description.SelStart = MaxLen
    End If
End Sub
 
Status
Niet open voor verdere reacties.

Nieuwste berichten

Terug
Bovenaan Onderaan