[Resolvido]Inserir dados de uma caixa de texto de um formulário a uma tabela

Caros colegas,

Criei uma caixa de texto ( txtData) em um formário, assim gostaria que esta caixa de texto deverá alimentar um campo de uma tabela (TblData) campo (Data) mas o problema é que essa tabela não tem vínculo com o formulário em questão, isso é possível pela fonte de controle ou VB?

Agradeço por toda ajuda,
Cleniro

Código:

Dim DB As Database
Dim sSQL    As String
    Set DB = CurrentDb
        sSQL = "INSERT INTO sua  tabela"
        'CAMPOS----------------------------------------
        sSQL = sSQL & "("
        sSQL = sSQL & "  campo da tabela"
      
        sSQL = sSQL & ")"
        'VALORES -------------------------------------
        sSQL = sSQL & " VALUES"
        sSQL = sSQL & "("
       sSQL = sSQL & " '" & Trim(capo do formulário) & "'"
        sSQL = sSQL & ")"
        DB.Execute sSQL
        Me.Requery

Crysostomo,

Uma dúvida, esse código ficaria no construtor de códigos da caixa de texto no formulário?

Fica no botão que você vai inserido dados do form para tabela

Crysostomo,

Tudo certinho, adaptei aqui para a minha necessidade, e tudo funcionando, muito obrigado pela ajuda.