Связь ComBox и TextBox - VB

Формулировка задачи:

Есть база mdb в которой есть таблица "Страны". В таблице есть 2 столбца Страна и Столица. через ADO загрузил в ComboBox столбец с именами стран. А теперь мне нужно, чтобы при выборе конкретной страны в ComboBox, в TextBox загружалась ее столица. Помогите, пожалуйста, пример, если можно.

Решение задачи: «Связь ComBox и TextBox»

textual
                            Листинг программы 
                        
                            <font color="blue">Private</font> <font color="blue">Sub</font> Combo1_Click()

<font color="blue">Dim</font> RS <font color="blue">As</font> <font color="blue">New</font> ADODB.Recordset
RS.<font color="blue">Open</font> <font color="teal">"SELECT Столица FROM Страны WHERE Страна='"</font> + <font color="blue">Me</font>.Combo1.Text + <font color="teal">"'"</font>, Conn, adOpenForwardOnly, adLockReadOnly
<font color="blue">Me</font>.Text1 = RS(<font color="darkblue"><b>0</b></font>)
RS.<font color="blue">Close</font>: <font color="blue">Set</font> RS = <font color="blue">Nothing</font>

<font color="blue">End</font> <font color="blue">Sub</font>