Через ADO в MySQL - VB

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

Мне надо создать таблицу через ADO.
как мне передать (create table my(idm int not null unique,str varchar(20));)
Я пробовал:
Adodoc1.RecordSource = "create table my(idm int not null unique,str varchar(20))"
Adodoc1.Refresh
ни хрена так не работает!
Как обратиться к ADO чтобы я смог создать таблицу в базе?

Решение задачи: «Через ADO в MySQL»

textual
                            Листинг программы 
                        

                            dim cn <font color="blue">as</font> new ADODB.Connection
<br>
<br>cn.<font color="blue">Open</font> <b><font color="green">"datasource BLA BLA BLA...."</font></b>
<br>
<br>cn.<font color="blue">Execute</font> <b><font color="green">"<font color="blue">Create</font> <font color="blue">table</font> BLA BLA BLA"</font></b>
                        