VERIFIER SI UN TEXT BOX CONTIENT DU TEXTE

Commentaire de ShadowMan le 06/02/2002 09:44:04

Mdr trop compliqué ce code ;)
Y'a un meilleur truc pour voir si un texte contient juste 1 partie d'un autre texte c'est l'instruction If InStr(1, text1.text, "texte") <> 0 then blabla

voilu a pluche les DjeunZ

Commentaire de thrakkazz2000 le 06/02/2002 12:51:06

et pour 2+2 deux tu fais appel à une fonction cosinus parce que là c'est un peu compliqué ton truc ;)

Commentaire de Arkko le 06/02/2002 15:47:38

cet fonction remet le focus sur le text box ... sinon le mecanisme de check serait sauter ou
Private sub command1_CLick()
If text1.text = "" Then
                                   MsgBox "Il faut d'aboud taper un texte !", vbExclamation, "Attention"
                                   Cancel = True
end if
end sub

Commentaire de magicyoda le 08/02/2002 18:24:45

hey c'est trop cooool ton code ! moi jvais en faire un sur détecter si le text d'un textbox c'est : "prout" ! ;)
jdéconne !! ;))) continu ! tlaisse pas faire par les nuls qui comprennent pas que têtre tu viens de commencer le vb .. ?!?

Commentaire de chillboy007 le 05/03/2003 01:54:42

if text1.text <> "" then
'si il y a du text
else
'si il y en a pas
end if

Commentaire de booleen59 le 14/02/2007 12:08:30

ben écoute tu te permet de mettre 2 à un source et tu n'es meme pas capable de tester ta text box avec l'événement Keypress sur lequel tu pourrez dire que pour pouvoir saisir sur cette text box il faut que le code ASCII soit compris entre tel nombre et tel nombre

Et en tout cas, TOI atoguum, je te mets 0 car sa me soul les mecs comme toi qui critique les sources des autres! Tout n'a pas la science infuse !!!!

Private Sub Text1_KeyPress(KeyAscii As Integer)
If (KeyAscii >= 65 And KeyAscii <= 90) Or (KeyAscii >= 97 And KeyAscii <= 122) Then
    MsgBox "caractère non valide pour cette boite de texte"
End If
End Sub