DATOS
Matrices

dim nombre(4) as string
dim edad(4) as single
nombre(1) = textbox1.text
nombre(2) = textbox2.text
nombre(3) = textbox3.text
nombre(4) = textbox4.text
edad(1) = textbox5.text
edad(2) = textbox6.text
edad(3) = textbox7.text
edad(4) = textbox8.text
if textbox9.text = 1 then
textbox10.text = "nombre:"+nombre(1)+vbcrlf+"edad:"+cstr(edad(1))
se escribe 3 veses mas cambiando le el numero de de nombre edad


* dim datos(4.2) as string
datos(0,0) = textbox1.text
datod(1.0) = textbox2.text
datos(2.0) = textbox3.text
datod(3.0) = textbox4.text
datos(0.1) = textbox5.text
datos(1.1) = textbox6.text
imprime = opcion -1
textbox10.text = "nombre:"+datos(imprime,0)+vbcrlf+"edad"+ datos (imprime,1)