VisualBasic.Net / Vb.Nette Textbox Yazısını Kayıt Etmek

'Projeye textbox, savefiledialog ve button nesnelerini ekleyin. 'Aşağıdaki kodu olduğu gibi yapıştırın.[/COLOR][/SIZE][/FONT][/CENTER]
[FONT=Trebuchet MS][SIZE=6][COLOR=#8000ff]
[CENTER] 
Imports System
Imports System.IO
Imports System.Text
Public Class Form1
 Public Sub Kaydet()
          SaveFileDialog1.Filter = "Metin Dosyaları (*.txt)|*.txt|"
        SaveFileDialog1.Title = "Metin Kaydet"
        SaveFileDialog1.ShowDialog()
        Dim path As String = SaveFileDialog1.FileName
        If File.Exists(path) = False Then
            Dim createText As String = TextBox1.Text
            File.WriteAllText(path, createText)
        End If
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 Kaydet()
End Sub
 
'Not: Vsual Studio 2008 için bir koddur. Alt sürümlerde çalışırmı bilmem. Herhalde çalışır...