ScSami
Messages postés1488Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention 3 décembre 2007
-
25 juin 2005 à 19:09
arkaye
Messages postés7Date d'inscriptionmercredi 5 novembre 2008StatutMembreDernière intervention18 novembre 2008
-
23 nov. 2008 à 14:52
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
arkaye
Messages postés7Date d'inscriptionmercredi 5 novembre 2008StatutMembreDernière intervention18 novembre 2008 23 nov. 2008 à 14:52
slt l'ami Je cherche ce programme sous forme console . vous pouvez m'aider un peux
flecheduneant
Messages postés1Date d'inscriptionjeudi 31 mars 2005StatutMembreDernière intervention28 juillet 2005 28 juil. 2005 à 13:06
p((i - 1) * 3 + (j - 1)).Text p c'est la zone de texte !!!
ScSami
Messages postés1488Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention 3 décembre 200724 25 juin 2005 à 19:18
Dit, pour rendre le code plus "lisible", il serait peut-être judicieux de faire appel aux conventions de codage de la MSDN !
Par exemple, les tableauc "tblMatrice1", les zones de texte "txtZoneA" ou alors "ztxZoneA", ..., ..., ...
Enfin, ce que j'en dis moi... c'est juste pour améliorer les choses!
ScSami
Messages postés1488Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention 3 décembre 200724 25 juin 2005 à 19:09
Moi pas comprendre :
Public Function produit()
For i = 1 To 3
For j = 1 To 3
mat_a(i, j) = Val(a((i - 1) * 3 + (j - 1)).Text)
mat_b(i, j) = Val(b((i - 1) * 3 + (j - 1)).Text)
Next j
Next i
For i = 1 To 3
For j = 1 To 3
mat_p(i, j) = 0
For k = 1 To 3
mat_p(i, j) = mat_p(i, j) + (mat_a(i, k) * mat_b(k, j))
Next k
p((i - 1) * 3 + (j - 1)).Text = Str(mat_p(i, j))
Next j
Next i
End Function
Aucune explications !!!
Ca sert à quoi, tu fais quoi exactement ?, ?, ?
De plus, y'a un ptit "bug"... Vérifie la propriété TabIndex de a(1) !!!
23 nov. 2008 à 14:52
28 juil. 2005 à 13:06
25 juin 2005 à 19:18
Par exemple, les tableauc "tblMatrice1", les zones de texte "txtZoneA" ou alors "ztxZoneA", ..., ..., ...
Enfin, ce que j'en dis moi... c'est juste pour améliorer les choses!
25 juin 2005 à 19:09
Public Function produit()
For i = 1 To 3
For j = 1 To 3
mat_a(i, j) = Val(a((i - 1) * 3 + (j - 1)).Text)
mat_b(i, j) = Val(b((i - 1) * 3 + (j - 1)).Text)
Next j
Next i
For i = 1 To 3
For j = 1 To 3
mat_p(i, j) = 0
For k = 1 To 3
mat_p(i, j) = mat_p(i, j) + (mat_a(i, k) * mat_b(k, j))
Next k
p((i - 1) * 3 + (j - 1)).Text = Str(mat_p(i, j))
Next j
Next i
End Function
Aucune explications !!!
Ca sert à quoi, tu fais quoi exactement ?, ?, ?
De plus, y'a un ptit "bug"... Vérifie la propriété TabIndex de a(1) !!!