Reciclar Form

[gasafonso]

Hola Gente, tengo un problema yo tengo un form con un msflexigrid y quiero cargar la grilla segun la opcion elegida en el menu,

Cuando digo opcion = tablas

tablas:
Paises
Ciudades
Localidades
tipos_obra_social, etc

PD: uso el data para conectarme

[CHOSS]

Select Case Menu
case "Paises"
Data.RecordSource = "Paises"
Data.Refresh
Case "Ciudades"
Data.RecordSource = "Ciudades"
Data.Refresh
Case "Localidades"
Data.RecordSource = "Localidades"
Data.Refresh
Case "Etc. . ."
Data.RecordSource = "Etc. . ."
Data.Refresh
end Case

[gasafonso]

Nunca use un SELECT CASE, me podes explicar un poco mas

yo tengo un menu :
name: mnutipos
index :
1
2
3


seria algo asi ?


Select Case mnutipos
Case 1
dsobrasocial.RecordSource = "select * from tbdetalleproveedor"
dsobrasocial.Refresh
Case 2
dsobrasocial.RecordSource = "select * from tbobrasocial"
dsobrasocial.Refresh
Case 3
dsobrasocial.RecordSource = "select * from tbremitos"
dsobrasocial.Refresh
end select

[culd]

Select Case, vendria a ser un IF anidado...

En ves de hacer

IF BLABLA THEN
END IF
IF BLABLA2 THEN
END IF

Directamente se usa SELECT CASE y segun el valor de la opcion se llama a un procedimiento... Siempre el valor a comparar tiene que provenir del mismo lugar.

[CHOSS]

Iniciado por gasafonso

Nunca use un SELECT CASE, me podes explicar un poco mas

yo tengo un menu :
name: mnutipos
index :
1
2
3


seria algo asi ?


Select Case mnutipos
Case 1
dsobrasocial.RecordSource = "select * from tbdetalleproveedor"
dsobrasocial.Refresh
Case 2
dsobrasocial.RecordSource = "select * from tbobrasocial"
dsobrasocial.Refresh
Case 3
dsobrasocial.RecordSource = "select * from tbremitos"
dsobrasocial.Refresh
end select

El select Case es como mensiona culd Son como varios IF . . . podrias chekar el siguiente link para mas informacion [URL="http://www.programacionfacil.com/visual_basic:select_case"]http://www.programacionfacil.com/visual_basic:select_case[/URL]


Y a que te refieres con Menu y el Index ¿? y si aparentemente seria como lo tienes solo que creo que seria asi

Select Case Index
Case 1
. . . .
Case 2
. . . .
Case 3
. . . . .
End select

[gasafonso]

Eso lo pongo en el evento Load no es cierto ?

[culd]

Iniciado por gasafonso

Eso lo pongo en el evento Load no es cierto ?

Depende lo que quieras hacer.

Si vos explicas mejor te vamos a entender...

No se a que le llamas Menu, pero supongamos que tenes OptionBox, donde tenes varias opciones para seleccionar, cada option tiene un numero de index, al seleccionar uno, toma como el index seleccionado

Hay que ver que es lo que vos necesitas...

Pero te diria que entrenes tu mente y trates de solucionarlo solo, es lo mejor que podes hacer

[Gakex]

Hola gasafonso Ya hace 10 que escribiste tu tema pero me párese interesante y creo que tengo algo que te puede funcionar.

Te cuento que hace poco encontré entre mis archivos antiguos un ejemplo para manejar una base de datos "automáticamente" el cual utiliza la referencia Microsoft Activex Data Objects 2.0 Library. Bueno concretamente lo que creo que te puede servir es la carga d las tablas en el combo, ya que este ejemplo te permite seleccionar una base de datos por medio de un comondialog y automáticamente llena tres combobox en uno todas las tablas de la base de datos y en otros dos quedando pendientes hasta que en el primero se seleccione la tabla se llenan con los capos de esta.

si te interesa mándame un MP y te lo paso.
ah también hace uso de un msflexygrid