Cita:
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