Question

find for this . fast

Answer 1

Private Sub cmdClear_Click()

Form1.Cls

End Sub

Private Sub cmdExit_Click()

Unload Me

End Sub

Private Sub cmdMult_Click()

Dim a(), b(), c() As Integer

Dim i, j, r1, c1, r2, c2, k As Integer

r1 = Val(InputBox(“Enter rows for First Array”))

c1 = Val(InputBox(“Enter columns for First Array”))

r2 = Val(InputBox(“Enter rows for Second Array”))

c2 = Val(InputBox(“Enter columns for Second Array”))

ReDim a(1 To r1, 1 To c1)

Print “First Array”

For i = 1 To r1

For j = 1 To c1

a(i, j) = Val(InputBox(“Enter Elements”))

Print a(i, j)

Next

Next

HOPE IT WORKS PLS MARK IT AS BRAINLIEST