Un programa de "formulario de currículum" escrito en VB.

¿oscuro? xm? ¿Como? Cadena,? ¿nl? ¿Como? Cadena,? xb? ¿Como? Cadena,? ¿SG? ¿Como? Cadena,? ¿zy? ¿Como? Línea

¿Oscura? ah1? ¿Como? Cadena,? ah2? ¿Como? Cadena,? ah3? ¿Como? Cadena,? ah4? ¿Como? Línea

¿Privada? ¿Sub? Check1_Click()

¿Y si? Verificar1. ¿valor? =?1?¿Y entonces qué? ah1? =?"Viajar"? ¿De lo contrario? ah1? =?""

¿Fin? Submarino

¿Privado? ¿Sub? Check2_Click()

¿Y si? Comprueba 2. ¿valor? =?1?¿Y entonces qué? ah2? ="Deporte"? ¿De lo contrario? ah2? =?""

¿Fin? Submarino

¿Privado? ¿Sub? Check3_Click()

¿Y si? Comprueba 3. ¿valor? =?1?¿Y entonces qué? ah3? =?¿Hay algo más sobre "música"? ah3? =?""

¿Fin? Submarino

¿Privado? ¿Sub? Check41_Click()

¿Y si? Comprueba 4. ¿valor? =?1?¿Y entonces qué? ah4? =?"Recoger sellos"? ¿De lo contrario? ah4? =?""

¿Fin? Submarino

¿Privado? ¿Sub? Command1_Click()

SMS 3. ¿Palabra? =?Reanudar. ? vbCrLf? y amplificador? Nombre: & amp? xm? y amplificador? vbCrLf? y amplificador? Edad:&? ¿nl? y amplificador? vbCrLf? y amplificador? "género:"? y amplificador? xb? y amplificador? vbCrLf? y amplificador? "Educación:"? y amplificador? ¿SG? y amplificador? vbCrLf? y amplificador? Ocupación: & amp? ¿zy? y amplificador? vbCrLf? y amplificador? "Pasatiempo"? y amplificador? ah1? y amplificador? ah2? y amplificador? ah3? y amplificador? ah4

¿El final? Submarino

¿Privado? ¿Sub? Command2_Click()

Texto1? =?"":?xm? =?""

Texto2? =?"":?nl? =?""

Texto3? =?""

Verificar1. ¿valor? =?0:?ah1? =?""

Marque 2. ¿valor? =?0:?ah2? =?""

Marque 3. ¿valor? =?0:?ah3? =?""

Marque 4. ¿valor? =?0:?ah4? =?""

¿Fin? Submarino

¿Privado? ¿Sub? Form_Load()

¿Fin? Submarino

¿Privado? ¿Sub? Option1_Click()

¿Y si? Opción 1. ¿valor? =?¿En serio? ¿Entonces qué? xb? =?"Masculino"

¿Fin? Submarino

¿Privado? ¿Sub? Option2_Click()

¿Y si? Opción 2. ¿valor? =?¿En serio? ¿Entonces qué? xb? =?"Mujer"

¿Fin? Submarino

¿Privado? ¿Sub? Opción 3_Click()

¿Y si? Opción 3. ¿valor? =?¿En serio? ¿Entonces qué? ¿SG? =?"Universidad"

¿Fin? Submarino

¿Privado? ¿Sub? Opción 4_Click()

¿Y si? Opción 4. ¿valor? =?¿En serio? ¿Entonces qué? ¿SG? =?"Licenciatura"

¿Fin? Submarino

¿Privado? ¿Sub? Option5_Click()

¿Y si? Opción 5. ¿valor? =?¿En serio? ¿Entonces qué? ¿SG? =?"Estudiante de posgrado"

¿Fin? Submarino

¿Privado? ¿Sub? Opción 6_Click()

¿Y si? Opción 6.

¿valor? =?¿En serio? ¿Entonces qué? ¿zy? =?"Profesor"

¿Fin? Submarino

¿Privado? ¿Sub? Opción 7_Click()

¿Y si? Opción 7. ¿valor? =?¿En serio? ¿Entonces qué? ¿zy? =?"Doctor"

¿Fin? Submarino

¿Privado? ¿Sub? Option8_Click()

¿Y si? Opción 8. ¿valor? =?¿En serio? ¿Entonces qué? ¿zy? =?"Servicio Civil"

¿Fin? Submarino

¿Privado? ¿Sub? Text1_Change()

xm? =?Texto1. Texto

¿Fin? Submarino

¿Privado? ¿Sub? Text2_Change()

nl? =?Texto2. Texto

¿Fin? Submarino