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

Signaler
Messages postés
153
Date d'inscription
vendredi 6 décembre 2002
Statut
Membre
Dernière intervention
29 mai 2005
-
ghitaik
Messages postés
36
Date d'inscription
lundi 1 novembre 2004
Statut
Membre
Dernière intervention
11 mai 2009
-
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

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

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