Visual Basic - AYUDENME

Hola Amigos.

Tengo la Necesidad de programar la seleccion de un clientes, por medio de un Combo,
donde me aparecen ordenados alfabeticamente los nombres
de Todos los clientes de la empresa.

Yo se perfectamente como programarlo el problema, es que este modulo
se repite en muchos programas diferentes,. Lo cual me llevaria a programarlo
repetidas veces.

La Pregunta que les hago es, COMO PUEDO SOLUCIONARLO ?.

Puede tener algo que ver la programacion de clases ?

Muchas Gracias

MARCELO

Hola mar:
Vamos a ver como te podria ayudar.Lo primero que hay que hacer es un procedimiento,lo que tendria que saber por donde quieres sacar esos datos del cliente,por listado o por campos (cajas de textos),bueno eso es lo de menos,te voy a poner un codigo espero no fallar.

En el click del combo vas a poner esto :

Call buscar_cliente(cadena)
cadena va a ser el nombre del cliente seleccionado

cadena=combo.list(cadena.listindex)
esto lo harias antes del call.
Bueno ahora declaramos nuestro procedimiento

sub buscar_cliente(cadena as string)
AHORA QUE TIENES EL NOMBRE DEL CLIENTE LO QUE TIENES QUE HACER ES HACER LA SELECCION CON ESE STRING

SET RECORDSET=BD.OPENRECORDSET("SELECT * FROM CLIENTES WHERE NOMBRE=' " & CADENA & " ' ")

YA EN EL RECORDSET TIENES LOS DATOS DE ESE CLIENTE Y SI QUIERES PUEDES DEVOLVER EL RECORDSET,PERO PARA ESO DEBERIAMOS HABER DECLARADO UNA FUNCION EN VEZ DE UN PROCEDIMIENTO,SERIA ASI

FUNCTION buscar_clientes(cadena as string) RS as recordset
Entonces en el resultado de la seleccion harias esto:
RS=Recordset
De esto ultimo ahora no estoy muy seguro si te daria algun fallo,eso ya seria cuestion de probarlo,de todas formas escribeme al correo si no te ha servido lo que te he explicado.
end sub

Perdona si no me he sabido explicar bien.
Chao y suerte