[Vb.net]Textbox yazısını kayıt etmek

[Nazdravia]

'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

 

[Drenated]

+

 

[1Jeff]

ellerine sağlk <3