/g) [VB] Equivalent expressions régulières Javascript (ex : /[a-z0-9] - Programmation
Marsh Posté le 30-07-2001 à 13:50:55
S'il ne doit y avoir qu'un caractère, on peut faire
if TextBox.text = "," or TextBox.text = "/" then
..
end if
Si cela doit être le premier caractère, on peut faire
if left$(TextBox.text, 1) = "," or (left$(TextBox.text, 1) = "/" then
..
end if
etc..
Tout dépend des exigences.
On peut même chercher s'il y a un caractère donné dans une chaîne.
S'il ne faut que des caractères alphanumériques ou , ou \, on peut faire qq chose comme cela
for k% = 1 to len(TextBox.Text)
c$ = mid$(TextBox.Text, k%, 1)
if c$ <> "," and c$ <> "\" and (c$ < "A" or c$ > "Z" ) then
ERREUR
exit for
end if
next k%
(de mémoire, je pratique plus VB)
On peut aussi s'attacher à l'évenement KeyPress ou KeyDown de VB qui arrive à chaque frappe de caractère au clavier et vérifier si le code ascii est bon. Sinon intercepter le code, ou signaler erreur.
Marsh Posté le 30-07-2001 à 14:30:00
OK merci. En fait je savais pas qu'on pouvait dire > "A", je croyais que ça ne s'appliquait qu'aux nombres.
Marsh Posté le 30-07-2001 à 15:01:51
Je sais plus trop. Si pas bon, passer par la valeur ASCII (ASC(C$) > xy). C'est un peu lointain VB. Je suis C 100% maintenant (pénible, mais très rapide).
Marsh Posté le 30-07-2001 à 13:20:07
Donc je cherche une leçon ou des infos sur les expressions régulières en VB. Je connait qu'en JS et je sais pas si ça existe en VB. Donc si ça n'existe pas voilà mon pb :
Y'a un TextBox dans lequel faut rentrer un signe qui servira de délimiteur à la fonction Split(). Mais si ce caractère est différent de "," ou "/" faut que je génère une erreur car en temps normal mettre une lettre ou un chiffre ne provoquera pas d'erreur automatiquement.