Lo que necesito es:
poner un combobox como lista desplegable con 3 opciones
despues abajo poner un textbox, para meter un nombre, y que según la opcion elegida en el combobox se meta en una tabla, en su lugar correspondiente. Al tener el combobox 3 opciones, la tabla será de 3 dimensiones, asi que si elijo lo opcion 1, se mete en la dimension 1, si elijo la 2, se mete en la 2 y si elijo la 3 en la 3, y dspues se meta todo lo de la tabla en un listbox, todo esto apartir de un boton, como se haria?
Hola
Citarponer un combobox como lista desplegable con 3 opciones
sub main
'poner las tres opciones al combo en caliente
combo1.additem "Opcion 1"
combo1.additem "Opcion 2"
combo1.additem "Opcion 3"
end sub
Citardespues abajo poner un textbox, para meter un nombre,
sub Command1_Click
'comprobar que hay un nombre escrito en el textbox
if text1='"" then
exit sub
endif
'comprobar que hay algo elegito en el combo
if combo1.listindex=-1 then
exit sub
endif
Citar
Al tener el combobox 3 opciones, la tabla será de 3 dimensiones, asi que si elijo lo opcion 1, se mete en la dimension 1, si elijo la 2, se mete en la 2 y si elijo la 3 en la 3
tabla(combo1.listindex)=text1
end sub
Citardspues se meta todo lo de la tabla en un listbox, todo esto apartir de un boton
sub command2_click
for x%=0 to ubound(tabla(combo1.listindex))-1
list1.additem tabla(x%)
next x%
end sub
Un saludo
;D