Visual Basic - ayuda con un combo box

Saludos Amigos del foro

miren tengo un combobox

y este contiene lo siguiente

CALANDREAS
BIORENTADO
MEZCLAS
COEXTRUSION
EXTRUSION

etc......

1.- si escojo por primera vez la opcion CALANDREAS y el query que lo controla encuentra la
informacion despliega el contenido en un GRID

2.- si la segunda vez escojo la opcion MEZCLAS pero no encuentra nada debe ponerme
la opcion CALANDREAS en el combobox

3.- y si la primera vez con cualquier opcion NO ENCUENTRA NADA pues que lo deje en blanco


ESPERO ALGUIEN PUEDA AYUDARME

se los agradecere mucho

Pues de que entendi tu problema lo entendi, pero para darte una posible solucion necesito mas datos acerca de como estas haciendo las cosas.

Un posible solucion (la mas facil) es que compruebes si no hay nada, de la forma en que lo hagas y si efectivamente no hay nada pues le regreses el valor anterior al cbox.

Como me estoy imaginando que no entiendas muy bien lo que te digo aqui va algo de (pseudo) codigo:

Dim opcionAnterior As Integer 'esta variable debe ser de modulo o sea que la declaras hasta arriba afuera de cualquier funcion.

opcionAnterior = -1 'esto debe ir en el Form_Load

'esto debe ir en el evento Click del combobox:

'primero llenas el grid y luego evaluas si esta vacio (como quiera que lo hagas)...
if estaVacioElGrid then
ComboBox1.ListIndex = opcionAnterior 'esto debe hacer que se vuelva a cargar el grid con los datos de la opcion anterior
else
opcionAnterior = ComboBox1.ListIndex
'haces las cosas que quieras....
end if

'el combobox debe tener su propiedad style a DropdownList.

Espero que te sirvan de algo mis pseudo ideas...

Salu2

1.- Guarda en una variable auxiliar el index de CALANDREAS (ej)
(index=combo.listindex)
2.- hace la query (MEZCLAS)y lo de arriba desde el evento click
Si tu query no mada nada data.bof=true data.eof=true
si esto pasa
combo.listindex=index y se posiciona en calandreas,
si es el primero el index debe ser -1(Blanco)
Dime si te sirve