Fenetre
cs_setif
Messages postés
6
Date d'inscription
mardi 22 janvier 2002
Statut
Membre
Dernière intervention
12 mai 2005
-
30 janv. 2003 à 12:46
cs_setif Messages postés 6 Date d'inscription mardi 22 janvier 2002 Statut Membre Dernière intervention 12 mai 2005 - 30 janv. 2003 à 14:18
cs_setif Messages postés 6 Date d'inscription mardi 22 janvier 2002 Statut Membre Dernière intervention 12 mai 2005 - 30 janv. 2003 à 14:18
3 réponses
sonoboss
Messages postés
178
Date d'inscription
lundi 17 juin 2002
Statut
Membre
Dernière intervention
2 octobre 2007
30 janv. 2003 à 13:59
30 janv. 2003 à 13:59
utilise un tableau à 1 dimension
et tu mets
for i=1 to uneborne
i=i+1
tab(i)=inputbox("kjhfkjshfjksd")
next i
voilà c tout!
Le jour où la merde vaudra de l'or, les pauvres naîtons sans trou du cul!
et tu mets
for i=1 to uneborne
i=i+1
tab(i)=inputbox("kjhfkjshfjksd")
next i
voilà c tout!
Le jour où la merde vaudra de l'or, les pauvres naîtons sans trou du cul!
cs_setif
Messages postés
6
Date d'inscription
mardi 22 janvier 2002
Statut
Membre
Dernière intervention
12 mai 2005
30 janv. 2003 à 14:17
30 janv. 2003 à 14:17
Merci
mais Voila Mon Probleme C'est mon 1 Programme en VB
je ne comprend pas ta reponce
Max=8
for Nb = 1 to Max
Call Fenetre.show ("Saisie des 5 Valleur")
Text1=Cote(nb).Diametre
Text2=Cote(nb).Longueur
Text3=Cote(nb).Chanfrien
Text4=Cote(nb).Angle
Text5=Cote(nb).Rayon
next
mais Voila Mon Probleme C'est mon 1 Programme en VB
je ne comprend pas ta reponce
Max=8
for Nb = 1 to Max
Call Fenetre.show ("Saisie des 5 Valleur")
Text1=Cote(nb).Diametre
Text2=Cote(nb).Longueur
Text3=Cote(nb).Chanfrien
Text4=Cote(nb).Angle
Text5=Cote(nb).Rayon
next
cs_setif
Messages postés
6
Date d'inscription
mardi 22 janvier 2002
Statut
Membre
Dernière intervention
12 mai 2005
30 janv. 2003 à 14:18
30 janv. 2003 à 14:18
Merci
je ne comprend pas ta reponce
mais Voila Mon Probleme C'est mon 1 Programme en VB
Max=8
for Nb = 1 to Max
Call Fenetre.show ("Saisie des 5 Valleur")
Text1=Cote(nb).Diametre
Text2=Cote(nb).Longueur
Text3=Cote(nb).Chanfrien
Text4=Cote(nb).Angle
Text5=Cote(nb).Rayon
next
je ne comprend pas ta reponce
mais Voila Mon Probleme C'est mon 1 Programme en VB
Max=8
for Nb = 1 to Max
Call Fenetre.show ("Saisie des 5 Valleur")
Text1=Cote(nb).Diametre
Text2=Cote(nb).Longueur
Text3=Cote(nb).Chanfrien
Text4=Cote(nb).Angle
Text5=Cote(nb).Rayon
next
