text multilinea

Analeydis
06 de Junio del 2003
Hola tengo un problema estoy tratando de imprimir o de mostrar una matriz 6*6 en un text multilinea y no se como me pueden ayudar con esto.
le agradezco su ayuda.

DD
06 de Junio del 2003
espero q este codigo t ayude, creo q es lo q estas pidiendo:

Dim matriz(1 To 6, 1 To 6) As String
For i = 1 To 6
For j = 1 To 6
matriz(i, j) = i & j
Next
Next
For i = 1 To 6
For j = 1 To 6
Text1 = Text1 & matriz(i, j) & Space(5)
Next
Text1 = Text1 & Chr(13) & Chr(10)
Next