consulta sobre un combobox

[jaullo]

Hola a todos, disculpas por no haberles colocado que era objaux
Les explico, objaux es una variable que se declara haciendo referencia una clase que he creado en la cual se encuentra el procedimiento buscar. Esta esta formada por un Namespace que contiene la clase, que a su vez contiene las funciones, pero eso depende de como lo quieran crear.

Por ejemplo

dim objaux As New conta.data (conta es el namespace, data la clase).
Sin embargo pueden declararlo mas sencillo, por ejemplo pueden crear una clase que se llame que buscar.
La declaracion quedaria algo como:
dim objaux as new buscar

Ahora en la clase deben importar los espacios de nombre
Imports Microsoft.VisualBasic
Imports System
Imports System.Data
Imports System.Data.SqlClient

y poner lo siguiente
Dim objconexion As New SqlClient.SqlConnection
Dim strconexion As String = "Data Source=tuserver;Initial Catalog=tubd;User ID=tuuser;Password=tupass"

Sub abrirbasedatos()
If objconexion.State = ConnectionState.Closed Then
objconexion.ConnectionString = strconexion
objconexion.Open()
End If
End Sub

'esta es la funcion buscar
'____seccion de consultas

Function buscar(ByVal cSQL$) As SqlClient.SqlDataReader
Try
abrirbasedatos()
Dim objcommand As New SqlClient.SqlCommand(cSQL, objconexion)
Return objcommand.ExecuteReader()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Function

Como ven objaux.buscar, solo referencia a la clase que posee la funcion buscar, espero haberles aclarado las dudas.

Saludos,