Visual Basic.NET - Llenar un Combo Box (Principiante)

Saludos a todos

grasias por su atension
y muchas grasias a los programadores que contesto la ves pasada

Pues haora es otro problema en VB.NET pude llenar el grid con un grid
aun mas antiguo pero eso ya lo resolbi por haora nesesito llenar un
combox dijite un codigo y no me funciona si alguien me podria correjir
el codigo o si es de otra forma y si ando perdido

sSQL = ""
sSQL = "SELECT NombreVendedor FROM tblvendedores " _
& "ORDER BY Name1 ASC "
Dim TblVendedores As New DataSet
Dim AdaptadorVent As OleDb.OleDbDataAdapter
AdaptadorVent = New OleDb.OleDbDataAdapter(sSQL, Cn)

'Dim Comando As OleDb.OleDbCommand = Cn.CreateCommand
'Comando.CommandText = sSQL
'Comando.CommandType = CommandType.Text
'Dim Lector As OleDb.OleDbDataReader = Comando.ExecuteReader()
' Me.CmbVendedores.DataSource = Lector

Me.CmbVendedores.DataSource = AdaptadorVent

no me funciono ni con el lector ni con el comando
NOTA la conexion me funciona bien ya llene el datagrid y grabo modifico
solo me falta llenar un combo para casi estar echo en .net bueno y
los reportes

Hola!!

En la consulta agrega el Id o como lo tengas

SELECT Id, NombreVendedor FROM tblvendedores

y también agrega esto:

Me.CmbVendedores.DataSource = AdaptadorVent
Me.CmbVendedores.DataTextField = "NombreVendedor"
Me.CmbVendedores.DataValueField = "Id"
Me.CmbVendedores.DataBind()

Suerte

Sinseramente se lo agradesco mucho

Muchas Grasias