السلام عليكم ورحمة الله وبركاته
عندي مجموعه من معلومات شخص وابغى احفظها اضع
هذا الكود
Private Sub mnuCustomerAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuCustomerAdd.Click
Dim MyCustomer As String
MyCustomer = txtNumber.Text & txtCity.Text & txtPhone.Text & txtAddress.Text &
With SaveFileDialog1
.DefaultExt = "txt"
.Filter = "Text Files (*.txt)|*.txt|All Files(*.*)|*.*"
.FilterIndex = 1
.Title = "Demo Save File Dialog"
End With
'Show the Save dialog and if the user click the add button ,Save the File
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim FilePath As String
FilePath = System.IO.Path.Combine(-My.Computer.FileSystem.SpecialDirectories.MyDocuments, -"StrFileName.txt")
( My.Computer.FileSystem.WriteAllText(FilePath, MyCustomer, False
btnOrder.Enabled = True
لمااضغط زر الحفظ يمشي كل كل خانه ويحفظها انا مابي كذا اريد مربع حوار الحفظ تظهر مره واحده ويحفظ جميع البياتات لهذا الشخص فما حل ذلك
وزر order ينقل للفور التي تليها بشر ط ان يكون حميع الخانات معبيه ولا اي واحد فاضي
انا كتبت هذا الكود بس ينتقل للفورم التي تليها دون التشيك ع الخانات فما الخطأ
Dim emptyboll As Boolean
Dim i As Integer
For i = 0 To MyText.Length - 1
If MyText(i).Text = "" Then
emptyboll = True
If emptyboll Then
MessageBox.Show("data not complite")
End If
Else
Form2.Show()
End If
Next
فما الخطا ارجو تصويبي والرد لذلك فانا بحاجه اليه
انا بانتظاركم
