It's me again, this time I need help about this:
Code:
Dim txtBox As String

On Error GoTo handler:

Open (App.Path & "\myfile.ext") For Output As #1

        If MsgBox("WARNING: This will overwrite your actual file! Are you sure?", vbOKCancel) = vbCancel Then
                    Exit Sub
        End If
        
        txtBox = txtData.Text
        Print #1, txtBox
        
Close #1

Exit Sub

handler: txtData.Text = "Error on saving"
This code (I got it from Pino's signature) saves a file as myfile.ext when I click the button, but it doesn't work for VB 2008. Can someone convert it please? Thanks again.