Visual Basic.NET - Coneccion de Combobox a base de datos

Tengo el siguiente codigo para conectarme desde un combobox a una base de datos en sybase, pero no me presenta datos en el combox, necesito ayuda. Gracias!!!

dim. myConnection As String

' If the connection string is null, use a default.

If myConnection = "" Then

myConnection = "PWD=rala78;DSN=DESARROLLO;UID=lbarrien;SRVR=DESARROLLO;DB=PRUEBA"

End If

Dim myConn As New Odbc.OdbcConnection(myConnection)

Dim mySelectQuery As String = "SELECT NOMB_DEPA FROM DEPA "

Dim myOdbcCommand As New Odbc.OdbcCommand(mySelectQuery)

myOdbcCommand.Connection = myConn

myConn.Open()

Me.CmbDepartamento.Items.Add(myOdbcCommand.ExecuteScalar)

Me.CmbDepartamento.Refresh()

'myOdbcCommand.ExecuteReader.NextResult()

myOdbcCommand.Connection.Close()

Hola

ExecuteScalar devuelve el valor de la primera columna de la primera fila, en el mejor caso esta devolviendo un solo valor en el combo

Lo que puedes hacer es crear el reader, asi

Dim reader as IDataReader
reader = 'myOdbcCommand.ExecuteReader

While reader.read()
aqui obtienes los valores con los metodos del reader GetXXX y los agregas al combo
Wend

Otra opción es que carges la información a un DataTable (usando adaptadores), luego invocas al metodo combo.DataBindings.Add ( .. ), asignas las propiedades DisplayMember y ValueMember y listo

Saludos