MON PREMIER PROGRAMME : CALCUL DU DÉTERMINANT D'UNE MATRICE 3X3

DHKold Messages postés 153 Date d'inscription vendredi 6 décembre 2002 Statut Membre Dernière intervention 29 mai 2005 - 15 févr. 2003 à 22:52
ghitaik Messages postés 36 Date d'inscription lundi 1 novembre 2004 Statut Membre Dernière intervention 11 mai 2009 - 1 déc. 2004 à 02:20
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/6133-mon-premier-programme-calcul-du-determinant-d-une-matrice-3x3

ghitaik Messages postés 36 Date d'inscription lundi 1 novembre 2004 Statut Membre Dernière intervention 11 mai 2009
1 déc. 2004 à 02:20
cela depend de la place ou tu lis les numeriques, si c'est dans un text alors:

Private Sub Text1_KeyPress(KeyAscii As Integer)
If ((KeyAscii < Asc("0") Or KeyAscii > Asc("9")) And KeyAscii <> 8) Then KeyAscii = 0
if((keyascii=13)then "traitement necessaire")
le 13 est le retour chariot (Entree)
le 9 est le backspace
DHKold Messages postés 153 Date d'inscription vendredi 6 décembre 2002 Statut Membre Dernière intervention 29 mai 2005 2
15 févr. 2003 à 22:52
C'est très simple, tu utilise isnumeric(), qui renvoit TRUE si c'est une valeur numérique, FALSE sinon, exemple ou le calcul n'est effectué que si Text1 contient un nombre:

if isnumeric(Text1) then text1 = (text1 ^ 2) * 3.1415

DHKold