TABLE DE MULTIPLICATION
econs
Messages postés
4030
Date d'inscription
mardi 13 mai 2003
Statut
Membre
Dernière intervention
23 décembre 2008
-
25 nov. 2003 à 08:44
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 25 nov. 2003 à 09:06
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 25 nov. 2003 à 09:06
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/18195-table-de-multiplication
https://codes-sources.commentcamarche.net/source/18195-table-de-multiplication
25 nov. 2003 à 09:06
25 nov. 2003 à 08:59
25 nov. 2003 à 08:57
1 form nommé Form1 + 1 bouton placé n'importe où, nommé Command1
----TON CODE MODIFIE----
Private Sub Command1_Click(index As Integer)
Dim a As Integer
Dim i As Integer
Cls
a = index
For i = 0 To 10
Print
Print Tab; a; "FOIS"; i; "EGAL"; a * i
Print
Next
End Sub
Private Sub Form_Load()
Dim i As Integer
With Form1
.Height = 10260
.Width = 8835
.Top = 0
.Left = 0
End With
With Command1(0)
.Height = 615
.Left = 5520
.Top = 360
.Width = 2055
.Caption = "0"
End With
For i = 1 To 9
Load Command1(i)
Command1(i).Caption = i
Command1(i).Top = 650 * i + Command1(0).Top
Command1(i).Visible = True
Next i
End Sub
----------------------------------
Je te laisse le soin, sur ces bases, d'inclure la division, la soustraction et l'addition.
Manu.
25 nov. 2003 à 08:44
Maintenant, tu vas pouvoir soigner le graphisme parce que les enfants ne seront pas attirés par çà.
Il faudra aussi rajouter les tables d'addition , de soustraction et de division, et pendant que tu y es, plutôt que de créer 36 boutons, sélectionner dans une liste le type de table et le chiffre que tu veux faire entrer dans le calcul et hop, avec un seul bouton, il te sort tout.
Bonne continuation