[Resolvido]recordset de uma caixa de texto em formulario para campo em uma tabela nao passa de 255 caracteres

Ola amigos.
estou usando o codigo abaixo para copiar dados de uma caixa de texto de um formlario nao vinculado para um campo em uma tabela, ambos conficorados para tipo memorando, porem qndo clico no botao para executar o codigo a copia nao passa de 255 caracteres, preciso de ajuda para encontrar o erro.

Código:

Private Sub Comando44_Click()
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("Select * from Arquivo Where [Telefone]= '" & Me.Txt_fone & "'")
If rs.RecordCount = 0 Then

rs.AddNew

rs("comentarios") = Me.Txt_obs.value

rs.Update
rs.Close
db.Close

Olá Ivan Junior,
Verifique na sua tabela o campo "comentarios" de que Tipo de dados permite receber e tamanho.
Alterando para MEMO, deve resolver.
Abraço

Obrigado pela atenção ahteixeira, já eliminei essa possibilidade, tanto o campo da tabela quanto o campo do formulário estão formatados para tipo Memorando, acredito que a falha esta no código do recordset mas não consigo enxerga-la.

Olá Ivan Junior, verifique melhor o que se está a passar no seu projecto.
Tente compilar o seu projecto, para isso:
ALT+F11 , DEBUG , Compile...

No entanto, fiz também pequeno teste e está a funcionar.
testeTamanho.zip
Abraço

ahteixeira, muito obrigado pelo tempo dedicado para entender meu problema. O exemplo que você criou me ajudou a solucionar o meu problema:

Comparando seu exemplo com meu projeto encontrei um bendito "@" no design do campo [comentarios] da minha tabela ele estava sinalizando o formato do campo vi que no seu exemplo não tinha isto e essa era a unica diferença entre os dois.
Exclui o "@" e o campo aceitou mais de 255 caracteres. Muito grato pela ajuda.

Olá Ivan,
Obrigado pelo retorno, os utilizadores do fórum agradecem.
Abraço