VB и SQL Server

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

Всем привет! Подскажите, пожалуйста, как можно сделать так, чтобы значения из Базы Данных таблицы Table1, поля Pole1 выводилось в форме VB в TextBox? Через DataSource база подключается, а дальше? Пожалуйста, если есть примеры или ссылки на нужную инфу -скиньте, пожалуйста. По-моему в и-нете катастрофически не хватает инфы о том, как делать приложения на VB в связи с SQL Server.

Решение задачи: «VB и SQL Server»

textual
                            Листинг программы 
                        
                                 Set Conn = CreateObject("ADODB.Connection")
 
     Set RS = CreateObject("ADODB.Recordset")
 
     DSNName = "DRIVER=Microsoft Access Driver (*.mdb);DBQ="
     DSNName = DSNName & HomeDir & "\test_base.mdb"
     Conn.Open DSNName
 
     SQL$="Select pole1 From Table1"
 
     RS.Open SQL, Conn, 3, 3
 
     Do While not RS.EOF
 
        txt=Cstr(Rs(0)) 
 
        Debug.Print Txt  
 
        Rs.MoveNext
 
     Loop