Visual Basic.NET - combobox y bd

Saludos, soy nuevo en este ambiente del vb.net y tengo una duda, tengo una aplicacion con base de datos en sql server, y necesito unos combobox que me carguen datos de la base, en vb 6 yo usaba un tdbcombobox o algo asi, en el cual podia cargar hasta varias columnas de una tabla en el combo box este, pero en el vb.net que control es el que hace esto, se puede usar un combobox normal para cargar datos alli o cual o como, alguien me ayuda???????

Espero esto te ayude ............

Imports System.Data.SqlClient

Dim Con As New SqlClient.SqlConnection
Dim AdpClientes As New SqlClient.SqlDataAdapter
Dim dsetClientes as New DataSet


Con.ConnectionString = "Data Source=(local);DataBase=TuBaseDatos;Integrated Security=SSPI"

Con.open

StrSQL = ("Select * from Clientes")

Dim AllClientes As New SqlClient.SqlCommand(StrSQL, Con)
AllClientes.ExecuteNonQuery()
Adpclientes.SelectCommand = AllClientes
Adpclientes.Fill(dsetClientes, "Clientes")
Con.Close()

cboClientes.DataSource = dsetClientes.Tables(0)
cboClientes.DisplayMember = "NombreCliente"
cboClientes.ValueMember = "Idcliente"

Exelente, esto era exactamente lo que buscaba, muchisimas gracias, no sabes como te lo agradesco Harold

Public Class clase_bencina
Private i_tipobencina As String
Private i_resultado As Decimal
Private i_cantidad As Decimal

Public Property cantidad() As Decimal
Get
cantidad = i_cantidad
End Get
Set(ByVal Value As Decimal)
i_cantidad = Value
End Set
End Property
Public Property resultado() As Decimal
Get
resultado = i_resultado
End Get
Set(ByVal Value As Decimal)
i_resultado = Value

End Set
End Property
Public Property tipobencina() As String
Get
tipobencina = i_tipobencina

End Get
Set(ByVal Value As String)
i_tipobencina = Value

End Set
End Property

Public Sub convertir()
If (tipobencina = "93 OCTANOS") Then
resultado = cantidad * 600
End If

If (tipobencina = "95 OCTANOS") Then
resultado = cantidad * 620
End If

If (tipobencina = "97 OCTANOS") Then
resultado = cantidad * 650

End If
End Sub
End Class

Public Class clase_fideos
Private i_fideo As String
Private i_resultado As Decimal
Private i_cantidad As Decimal

Public Property cantidad() As Decimal
Get
cantidad = i_cantidad
End Get
Set(ByVal Value As Decimal)
i_cantidad = Value
End Set
End Property
Public Property resultado() As Decimal
Get
resultado = i_resultado
End Get
Set(ByVal Value As Decimal)
i_resultado = Value

End Set
End Property
Public Property fideo() As String
Get
fideos = 37
End Get
Set(ByVal Value As String)
i_fideo= Value

End Set
End Property

Public Sub convertir()
If (fideo = "carozi 03") Then
resultado = cantidad * 37
End If

If (fideo = "carozi 04") Then
resultado = cantidad *02
End If

If (fideo = "carozi 05")Then
resultado = cantidad * 04

End If
End Sub
End Class
//formularios

Public Class Form1
Inherits System.Windows.Forms.Form
Dim mi_clase As New clase_fideos.clase_fideos
Private Sub carga_datos()
Try
mi_clase.fideos = Me.cbx_fideos.Text
mi_clase.fideos = Me.tb_litros.Text
Catch ex As Exception

End Try
End Sub

Private Sub bt_pagar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_pagar.Click
carga_datos()
mi_clase.convertir()
Me.tb_resultado.Text = mi_clase.resultado

End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub cbx_tipobencina_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles class.bfideos.SelectedIndexChanged


End Sub
End Class