Dim write As IO.StreamWriter
Try
write=New IO.StreamWriter(file)
write.write(txtEncryption.text)
Catch ex As Exception
'Prompt error
Console.WriteLine("Error {0}",ex.Message)
Finally
If write IsNot Nothing Then
write.Close()
End If
End Try
Assumption (if file was not opened anywhere else) : You open already opened one.Make sure that all your opened streams closed properly. You can use this syntax too
Using writer As StreamWriter = New StreamWriter(file)
writer.Write("....")
//and so on
End Using