Es posible esto:





Si existe c:\log.txt lo abre y pone todos los datos en text1.text (multiline), si no existe lo crea...





Con un timer1 cada 9 segundos borra todo el contenido de log.txt y inserta el de text2.text, que previamente se modifica cada segundo...

En la guia de recursos hay un post de como guardar un archivo, revisalo.





Suerte

Si no entendiste, quiero que borre el contenido del anterior y que lo bara al form_load, si no existe lo crea

Te pongo dos procedimientos, una para cargar el TextBox desde un archivo .txt y otro que hace lo contrario

Código:

Private Sub TextBox_txt()
 ' guardar en Log.txt (si no existe lo crea)
 Dim n As Integer
 n = FreeFile
 Open App.Path & "\Log.txt" For Output As #n
 Print #n, Text1.Text
 Close #n
End Sub


Private Sub Txt_TextBox()
 ' escribe en el TextBox el archivo Log.txt
 Dim n As Integer
 On Error GoTo txtErr
 n = FreeFile
 Open App.Path & "\Log.txt" For Input As #n
 Text1 = Input(LOF(n), n)
 Close #n
 Exit Sub
txtErr:
 If Err.Number = 53 Then
 ' El archivo no existe, lo creamos
 TextBox_txt
 Else
 MsgBox Err.Number & " - " & Err.Description
 End If
End Sub

En el evento Load del Form, llamar al procedimiento Txt_TextBox


Después lo que tendrías que hacer en el Timer cada 9 seg. ponerle la instrucción Text1.Text = Text2.Text y llamar al procedimiento TextBox_txt.


Saludos