vb6 mysql5

Olá pessoal,Não estou conseguindo fazer funcionar este insert e estou usando a data no formato: YYYY-MM-DD padrão do MySQLSet objrs = objCN.Execute("INSERT INTO tb_alunos(Nome,DataNascimento,Id_bairro,Ativo)" & _ "values('" & cboNome.Text & "','" & txtDataNascimento.Text & "','" & cboBairro.ItemData(cboBairro.ListIndex) & "','" & chkAtivo.Value & "'")