Buscando código de programa, lenguaje VB.

¿Privado?Sub?Command1_Click()

a?=?1

b?=?1

Imprimir?a,? b

n?=?1

¿Hacer?Mientras?n?

n?=?n?+?1

c?=?a?+?b

Imprimir?c

a?=?b

b?=?c

Bucle

¿Fin?Sub