Função Split exibi valores em colunas

Olá Pessoal,

estou trabalhando com a função split para exibir dados de um array em colunas.

Tenho o seguinte código da função:

<%
mystring = "Como eu faço para separar uma string em várias strings e em colunas?"
myarray = Split(mystring, " ")
For i = 0 to Ubound(myarray)
Response.Write i & " - " & myarray(i) & "<br>"
Next
%>

A dúvida é como separar cada palavra em uma coluna?

Acho que esse código pode ser útil para quem for trabalhar com split