Alter Table campo data no formato hora completa

Boa noite a todos!

Preciso adicionar um campo em uma tabela, via vba, do tipo Data. Já passei um bom tempo na busca do fórum, mas não encontrei.

Como ficaria para criar no formato Hora Completa (00:00:00)?

Banco.Execute ("ALTER TABLE TB_OPERACAO ADD COLUMN DT_OPER DATE ;")

Desde já, muito obrigado.

O tópico abaixo seria uma luz.
https://www.maximoaccess.com/t35099-resolvidoadicionar-um-campo-em-tabela-via-vba

Código feito

Código:

Sub NomeProcedimentoQualquer()
On Error Resume Next

    Dim Banco As DAO.Database
   
    Set Banco = CurrentDb
    Call Banco.Execute("ALTER TABLE TB_OPERACAO ADD COLUMN DT_OPER DATE;")
    Banco.TableDefs("TB_OPERACAO").Fields("DT_OPER").Properties("Format").Value = "Long Time"
   
    If Err Then
        Call Err.Clear
        Dim prp As Property
        Set prp = Banco.CreateProperty("Format", dbText, "Long Time")
        Call Banco.TableDefs("TB_OPERACAO").Fields("DT_OPER").Properties.Append(prp)
        Set prp = Nothing
    End If

    Set Banco = Nothing

End Sub