Como llenar un combobox desde sql server 2008

Cerrado
Javi - 4 jul 2012 a las 08:05
hola he intentado llenar un combobox de visual basic desde sql server 2008 pero no me resulta si alguien quisiera ayudar porfavor

Dim Conexion As New OleDbConnection(CadenaConexion)
Dim var As OleDbDataReader
Dim consulta As New OleDbCommand

consulta.CommandType = CommandType.Text
consulta.CommandText = ("select * from Comunas")
consulta.Connection = (Conexion)
Conexion.Open()
var = consulta.ExecuteReader()
While (var.Read = True)
cmbComuna.Items.Add(var.Item(0))
End While
Conexion.Close()