25-01-19, 03:46 AM
السلام عليكم ورحمة الله وبركاته
أخي الفاضل أول ملاحظة على المشروع
لا تقم بعمل me.hide للشاشة الرئيسية Form1 لانك لن تستطيع اغلاق البرنامج
ممكن تعمل form2 هي الرئيسية وتستدعي Form1 عن طريق showdailog
وبالتالى لن تقابل اي مشكلة في اغلاق البرنامج او فتحه مرة أخرى
ثانيا بالنسبة لمشكلتك فهي بسيطة وهي إنك قمت بتطبيق أمر الحفظ مرتين متتاليتين ولتصحيح الخطأ أنظر الكود التالي
كود :
Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
If Employees_Show.state = "add" Then
load_employees()
employees.Rows.Add(TextBox1.Text, TextBox2.Text, TextBox3.Text, TextBox4.Text, TextBox5.Text)
Save_employees()
End If
If Employees_Show.state = "edit" Then
load_employees()
employees.Rows(Employees_Show.postion).Item("Emp_Code") = TextBox1.Text
employees.Rows(Employees_Show.postion).Item("Emp_ID") = TextBox2.Text
employees.Rows(Employees_Show.postion).Item("Emp_Name") = TextBox3.Text
employees.Rows(Employees_Show.postion).Item("Emp_Section") = TextBox4.Text
employees.Rows(Employees_Show.postion).Item("Emp_Job") = TextBox5.Text
Save_employees()
End If
End Subونصيحة مني أخي
يفضل أن تجعل للجدول حقل ترقيم تلقائي
وأن تجعل كود الموظف أو الاي دي الخاص به ايهما اتوماتيك وليس يدويا لانه بهذة الطريقة متعب جدا لمن يدخل البيانات
تمنياتي لك بالتوفيق والنجاح
لا إله إلا الله وحده لا شريك له له الملك وله الحمد وهو على كل شئ قدير
سبحان الله وبحمده سبحان الله العظيم
سبحان الله والحمد لله ولا إله إلا الله والله أكبر ولا حول ولا قوة إلا بالله العلى العظيم
رب أغفر لي

