Fonction rappellant une valeur

Résolu
niikkoo Messages postés 50 Date d'inscription mercredi 20 juillet 2005 Statut Membre Dernière intervention 4 septembre 2007 - 22 juil. 2005 à 10:21
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 - 24 juil. 2005 à 16:49
hello,
1/je veux faire une fonction / procédure qui donne:
nouveautotal=totalprécédent+total des données renseignées par l'utilisateur (via des txtbox) tout ça avec des integer

2/comment faire pour, lorsqu'on applique une booucle for aux index de txtbox, le traitement ne plante pas si une des txtbox n'est pas renseignée???
merci
NiikkoJavascript:Insert_Emoticon('/imgs2/smile_sad.gif');

3 réponses

Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
22 juil. 2005 à 10:47
Dim i As Integer

Dim total As Integer



For i = 0 To Text1.Count - 1

total = total + Val(Text1(i).Text)

Next

MsgBox total


Daniel
3
mythic_kruger Messages postés 241 Date d'inscription jeudi 8 janvier 2004 Statut Membre Dernière intervention 10 novembre 2005
24 juil. 2005 à 13:58
Ajoutes if textbox <> "" then ...
0
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
24 juil. 2005 à 16:49
je vois pas l'intérêt de rajouter un test puisque Val(Text1) renverra zéro de toute façon.

Daniel
0