bjr voila ci dessous la routine pr le produit matriciel ,mais j arrive pas pr faire un bouton qui calcule le détérminant des matrices et l inversion de la matrice
Public matriceA(), matriceB(), matriceC() As Double
Public nca, nla, nlb, ncb, ncc, nlc As Byte
Public Const largeurcellule = 800
Public Const hauteurcellule = 300
Public Sub produitmatriciel(A, B, c, ligneA, colonneA, colonneB) 'code pr le produit matriciel a*b=c
Dim i, j, k As Byte
For i = 1 To ligneA
For j = 1 To colonneB
c(i, j) = 0
For k = 1 To colonneA
c(i, j) = c(i, j) + A(i, k) * B(k, j)
Next k
Next j
Next i
salut,
il faudrait commencer par typer tes variables
Public nca, nla, nlb, ncb, ncc, nlc As Byte est interprété comme
Public nca as variant, nla as variant, nlb as variant, ncb as variant, ncc as variant, nlc As Byte
idem donc pour tes tableaux
il faut aussi les dimensionner
et tes arguments doivent être typés
++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
