Visual Basic - DataCombo y TextBox

Enlazo un datacombo a una DB de Access y me muestra los datos especificados en el ListField, ahora quiero que al seleccionar un dato del datacombo muestre en un textbox los demás datos del datacombo. Aquí está mi código:

'Conexión y consulta a la DB
Set rstArticulos = New ADODB.Recordset
strQuery = "SELECT Id, Descripcion, Precio, Existencia FROM Inventarios"
rstArticulos.Open strQuery, mdiPrincipal.Conexion, adOpenStatic, adLockReadOnly

Set comboArticulos.RowSource = rstArticulos
comboArticulos.ListField = "Descripcion"
comboArticulos.BoundColumn = "Id"
comboArticulos.Refresh

Cómo asigno el valor de Id? por ejemplo a una variable
Cómo muestro la el campo Existencia en un TextBox?

Espero que este clara la pregunta para ustedes.
Saludos y gracias

Puedes utilizar el evento "click", para obtener los datos .
'**** guardar en variables ******
dim valcodigo as integer
dim strnombre as string
valcodigo = comboarticulos.boundtext
strnombre = comboarticulos.text
' *** mostrar en cuadros de texto ********
Text1.text = comboarticulos.boundtext
Text2.text = comboarticulos.text

'

Iñaki:

Gracias por tu ayuda, es exactamente lo que quería hacer, ya tenía algo de tiempo tratando de lograrlo sin éxito. Te agradezco tu ayuda.

Saludos y gracias de nuevo
Manuel Arzate M.