محتاجه أحد يشرحلي أكووووووااااااااااااااااااااااد مهمه لأن مناقشتي قربت
بليز وببدأ بعرض الكود
1) Dim filename As String
Dim result As DialogResult = SaveFileDialog1.ShowDialog()
SaveFileDialog1.CheckFileExists = False
If result = Windows.Forms.DialogResult.Cancel Then
Return
End If
filename = SaveFileDialog1.FileName
If filename = "" OrElse filename = Nothing Then
MessageBox.Show("invalid file name", "error", MessageBoxButtons.OK, MessageBoxIcon.Error)
Else
Dim stream As IO.StreamWriter
stream = New IO.StreamWriter(filename)
stream.Write(TextBox1.Text)
stream.Write(TextBox2.Text)
stream.Write(TextBox3.Text)
stream.Write(TextBox4.Text)
stream.Write(TextBox5.Text)
stream.Write(TextBox6.Text)
stream.Write(TextBox7.Text)
stream.Write(TextBox8.Text)
stream.Write(TextBox9.Text)
stream.Write(TextBox10.Text)
stream.Close()
End If
End Sub
وجزا الله خير من يساعدني