Générateur de table mathématique
Soyez le premier à donner votre avis sur cette source.
Vue 3 162 fois - Téléchargée 195 fois
Description
Ce petit programme (qui, je pense ne sert pas à grand chose), vous permet de vous retrouver dans la "petite enfance". Vous vous souvenez de toutes vos tables ?
Si jamais, revoyez-les avec ce programme.
Ce programme n'est pas du tout compliqué. Ca fait réviser la manipulation des lists.
Je pense avoir tout expliqué.
Vous pouvez donner un commentaire ou pas(si c'est trop nul, vous pouvez vous en dispenser), c'est vous qui voyez...
J'ai mis à jour, j'ai ajouté le calcul dans la liste ;)
Si jamais, revoyez-les avec ce programme.
Source / Exemple :
Private Sub Command1_Click()
List1.Clear 'Efface la liste, ça permet de recharger une autre table par la suite
'On nomme les objets pour faire un code plus court
n = Text1 'Zone de texte qui contient le nombre pour lequel on va créer la table
t = Text2 'Zone de texte qui contient le nombre qui définira jusqu'où ira la table
For i = 0 To t
List1.List(i) = n & "x" & i & " = " & (n * i)
'(i) détermine le numéro de la ligne de la liste
'i fixe la limite
'n * i permet de faire la table en multipliant le nombre donné avec le nombre max
Next i 'Permet la boucle, ce qui va remplir la liste
End Sub
Conclusion :
Ce programme n'est pas du tout compliqué. Ca fait réviser la manipulation des lists.
Je pense avoir tout expliqué.
Vous pouvez donner un commentaire ou pas(si c'est trop nul, vous pouvez vous en dispenser), c'est vous qui voyez...
J'ai mis à jour, j'ai ajouté le calcul dans la liste ;)
Codes Sources
A voir également
- Générateur de table de vérité
- Table de mathematique - Meilleures réponses
- Generateur de table - Meilleures réponses
- Php table - Conseils pratiques - PHP
- Table de multiplication javascript ✓ - Forum - Javascript / DHTML
- Avec une seule requête il est possible d'interroger plusieurs tables à la fois - Forum - PHP
- Implémentation table de hachage en c - Guide
- Nomenclature table - Conseils pratiques - PHP
16 mai 2004 à 12:32
List1.List(i) n & "x" & i & " " & (n * i)
là, ça marche :)
merci rene ;)
je vais mettre à jour du coup...
- Messages postés
-
1858
- Date d'inscription
- samedi 29 juin 2002
- Statut
- Membre
- Dernière intervention
- 17 octobre 2013
1116 mai 2004 à 02:02
Private Sub Command1_Click()
List1.Clear
Dim n As Integer, t As Integer, i As Integer, Resultat As String
n = CInt(Text1.Text) n est un nombre entier
t = CInt(Text2.Text) t est un nombre entier
For i = 0 To t
'On définit Resultat comme un texte (une chaîne) composé de :
'le texte (CStr) représentant le nombre n ; le signe "x" ;
'le texte (CStr) représentant le nombre i ; le signe "=" ;
'le texte (CStr) représentant le résultat de la multiplication de n par i
'Le tout mis bout à bout (concaténé) et utilisant l'opérateur
'de concaténation "&" plutôt que le signe "+" trop ambigu :
Resultat CStr(n) & " x " & CStr(i) & " " & CStr(n * i)
'Il reste à afficher tout ça :
List1.List(i) = Resultat
Next i
End Sub
16 mai 2004 à 00:13
- Messages postés
-
908
- Date d'inscription
- jeudi 26 juillet 2001
- Statut
- Modérateur
- Dernière intervention
- 1 février 2015
216 mai 2004 à 00:06
list1.additem n + "x" + i + " = " + (n * i)
16 mai 2004 à 00:03
si je met "list1.list(i)=....." ça me met "type incompatible"
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.