Como muestro el contenido de un campo de un combobox en un tooltip

Alex
21 de Agosto del 2005
Tengo el sisguiente código:

Dim CN1 As New OleDb.OleDbConnection()
Dim CNSTR1 As String
Dim SELECTSTR1 As String
CNSTR1 = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Ubicacion
CN1.ConnectionString = CNSTR1
CN1.Open()
CN1.Close()
SELECTSTR1 = "SELECT IDCODI + ' ' + DESCRIPCION AS DESCRI, IDCODI FROM INMAES"
Dim DA1 As New OleDb.OleDbDataAdapter(SELECTSTR1, CN1)
Dim DS1 As New DataSet()
DA1.Fill(DS1, "INMAES")
Cmbingr.DataSource = DS1.Tables("INMAES")
Cmbingr.DisplayMember = "DESCRI"
Cmbingr.ValueMember = "IDCODI"
Cmbingr.Visible = False

en donde obtengo un combobox con los campos codigo y descripcion, y quisiera extraer el contenido de la descripcion en un tooltip

Por favor es urgente