¿Cómo mostrar mediante programación una tabla de suma dentro de 10 en VBA? ¿Puedes traer una representación?

Código escrito en VB6

Private Sub Command1_Click()

Para i = 1 a 10

Imprimir espacio((i - 1 ) * 7);

Para j = i A 10

? Formato de impresión(i " "); Formato(j "="; @@@");

Siguiente j

Imprimir

Siguiente i

End Sub

La representación es como se muestra a continuación