majuscule

Bonjour,

petit <zpetitcv@hotmail.com> a confié :
| bonjour,
|
| j'ai office 97, dans un formulaire l'utilisateur doit rentrer le
| prénom en minuscule.
|
| Je voudrais savoir s'il est possible vérifier si la majuscule bloquée
| est activée et l'éteindre.
| avant que l'utilisateur tape le prénom en majuscule
|
| merci beaucoup
|
| claude

Plus simple : correction de la saisie à la volée
dans l'événement "sur changement" de la zone de texte :

Private Sub Text4_Change()
Me!Text4.Value = LCase(Me!Text4.Text)
Me!Text4.SelStart = Len(Me!Text4.Value)
End Sub

--
à+
Arnaud (hum .....non rien ;-)
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------

Salut,

| j'ai office 97, dans un formulaire l'utilisateur doit rentrer le prénom en
| minuscule.
|
| Je voudrais savoir s'il est possible vérifier si la majuscule bloquée est
| activée et l'éteindre.
| avant que l'utilisateur tape le prénom en majuscule


Il est plus simple de tout mettre en minuscule ensuite...
Dans l'événement "Après mise à jour" du champ, tu mets :

[ChampPrénom] = LCase([ChampPrénom])



--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------

Bonsoir.

en complément de mes amis car j'aime me distinguer d'eux pour offrir la
diversité même si ce n'est pas indispensable à 100%:
sur la page : http://access.seneque.free.fr/capslock_numlock.htm tu
trouveras une procédure pour placer le clavier directement en minuscule. ce
qui n'empêche pas de tester à la sortie.

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"petit" <zpetitcv@hotmail.com> a écrit dans le message de
news:hTYgb.147138$lh.30328067@amsnews02.chello.com...

bonjour,

j'ai office 97, dans un formulaire l'utilisateur doit rentrer le prénom
en

minuscule.

Je voudrais savoir s'il est possible vérifier si la majuscule bloquée est
activée et l'éteindre.
avant que l'utilisateur tape le prénom en majuscule

merci beaucoup

claude

A mon tour :
Voilà une fonction à mettre dans une procédure qui permet de transformer :

vero ou VERO en Vero
jean claude ou JEAn CLAude en Jean Claude

sur ApresMAJ du champ,
me.MonChamp = proper(me.MonChamp)

'Mettre dans une procédure
Function Proper(X)
' Mettre la première lettre de chaque mot d'un champ en majuscule.
' Utiliser dans une procédure événementielle AfterUpdate d'un contrôle;
Dim temp$, C$, OldC$, i As Integer
If IsNull(X) Then
Exit Function
Else
temp$ = CStr(LCase(X))
' Initialiser OldC$ en un espace simple car la première lettre
' doit être mise en majuscule même si aucun caractère ne la précède.
OldC$ = " "
For i = 1 To Len(temp$)
C$ = Mid$(temp$, i, 1)
If C$ >= "a" And C$ <= "z" And (OldC$ < "a" Or OldC$ > "z") Then
Mid$(temp$, i, 1) = UCase$(C$)
End If
OldC$ = C$
Next i
Proper = temp$
End If
End Function


Netchris



"petit" <zpetitcv@hotmail.com> a écrit dans le message de
news:hTYgb.147138$lh.30328067@amsnews02.chello.com...

bonjour,

j'ai office 97, dans un formulaire l'utilisateur doit rentrer le prénom
en

minuscule.

Je voudrais savoir s'il est possible vérifier si la majuscule bloquée est
activée et l'éteindre.
avant que l'utilisateur tape le prénom en majuscule

merci beaucoup

claude

Bonjour,


Un grand merci à vous tous pour les réponses


claude