Вот моя старая реализация умножений матриц на VB. Отрыл в архивах. По идее рабочая, но на всякий случай 1 раз стоит пересчитать на бумажке.
Код:
For p = 1 To mA
For k = 1 To nB
For j = 1 To nA
C(p, k) = C(p, k) + A(p, j) * B(j, k)
Next j
Next k
Next p
Ну, поменять имена переменных надо будет. nA - количество строк в матрице А, mA - количество столбцов.