Tu problema es que estas usando pocos tabs para alinear el texto, pero el tema es que la "longitud" del texto, no se cuenta con la cantidad de caracteres, sino con la longitud propiamente dicha. X ejemplo, en la palabra "rosario", que tiene 7 caracteres, tenes que agregar un tab extra, pero en la palabra "formosa", si le agregas uno mas, se te desalinea...
Esto en cuanto a la segunda funcion AddData.
En la primera, esa es la que tenes que usar, pero haciendole un par de modificaciones a la funcion Tabular:

Private Function Tabular(Palabra As String, Espacio As Long, Optional AlignRight As Boolean) As String
    If AlignRight Then
        Tabular = Space(Espacio - Len(Palabra)) & vbTab & Palabra & vbTab
    Else
        Tabular = Palabra & Space(Espacio - Len(Palabra)) & vbTab
    End If
End Function

A mi me quedo todo ordenadito, espero que te funcione a vos tambien, pero xq no usas mejor ListBox o varios Textbox?, o incluso varios Label...

Espero que te sirva
Un abrazo
APOKLIPTICO

La verdad es que me encanta, parece re profesional y aparte, toda la interfaz tiene re buen diseño, el fono, el bannercito, el +iva. Muy buen trabajo...
APOKLIPTICO

Me imagine que algo asi seria pero es que pobre lipman_dj lo trate como un newbie cualqueira que postea sobre cheats counter-strike en el foro de hacking wireless, sorry about that...

Un abrazo
APOKLIPTICO

Es verdad, que tonto que fui, mil disculpas  ..

Apokliptico

Esto no va en programacion VB! que te hace pensar que va aqui??

Para hacerlo, tenes que ir a Herramientas --> Opciones de internet y en "Advanced" deschequea en donde dice "Deshabilitar depuracion de Comandos". Y listo. Tambien podrias pensar en usar Firefox  .

Un Abrazo
APOKLIPTICO

http://es.wikipedia.org/wiki/Clipper_(lenguaje_de_programaci%C3%B3n) Gente, por favor, si no saben algo, le preguntan a DIOS

Un abrazo
Apokliptico

Esto deberia ir en Wargames o en Criptografia, y el link esta roto 

Un abrazo
APOKLIPTICO

Porque le sacaron la chincheta???

SAludos

Option Explicit
Public Command1X, Command1Y
 
Private Sub Form_Load()
Command1X = Command1.Width / Form1.Width
Command1Y = Command1.Height / Form1.Height
End Sub
 
Private Sub Form_Resize()
Command1.Width = Command1X * Form1.Width
Command1.Height = Command1Y * Form1.Height
End Sub
 

- Command1 es un Boton
- Command1X y Command1Y son la proporcion q hay q mantener en la anchura y altura respectivamente, si queres mantener una de las dos constantes, entonces no cambies alguna de las dos.

Un abrazo
APOKLIPTICO

http://hjt.networktechs.com/

En esta pagina vos pegas el log, y te lo analiza, es bastante util para los que no tienen mucha idea y quieren aprender a diferenciar la basura de lo bueno.

Un abrazo
APOKLIPTICO