Mysql + VB....erro ao criar tabela

E ai pessoal beleza????.....

Toh tentando criar um tabela com este código abaixo, mas tah dando erro, para executar uma query tah beleza, mas para criar tabelas volta este erro:

table systema10 already exists....

Set cnn = CreateObject("ADODB.Connection")    cnn.Open "DRIVER={MySQL ODBC 3.51 Driver};user=root;password=senha;server=localhost;database=lista;option=20499"    Set rs = CreateObject("ADODB.RecordSet")    Set rs.ActiveConnection = cnn    Ssql = "create table systema10 (expirou int(2), data_ult date, cod_cli int(5), data_validade date, serial int(10));"    rs.Open Ssql, cnn    cnn.Execute Ssql

Obrigado