Basic - Cubo en Basic(Urgente)

Necesito crear una forma que sea un cubo en Basic pero me estoy volviendo loco para hacer el cubo línea por línea, ¿Alguien sabe si hay alguna funcion que me genere un cubo o alguna manera más fácil de realizarlo que no sea hacerlo línea a línea?

Nose si es un poco tarde, pero busca en www.qbasic.com hay algo de eso.

Nose si es un poco tarde, pero busca en www.qbasic.com hay algo de eso.