لدي اسماء مخزنة في قاعدة البيانات استعرضها في الفورم بشكل طبيعي
أريد فقط عند اختيار موظف وتظهر بياناته في التكست بوكس ، وعند الضغط على البوتين المحدد تتجه البيانات المحددة إلى الداتا قريد حتى استطيع مستقبلاً أن ارسلها إلى ملف أكسل أو اطبعها.
اللهم ارحم من أسس هذا المنتدى (اباليث) و أجعل كل علم نافع تعلمناه في هذا المنتدى أجر له و صدقة تنفعه في قبره
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
For i As Integer = 0 To dgv_employees.Rows.Count - 1
If dgv_employees.Rows(i).Cells(0).Value = ID.Text Then
MsgBox("هذا الموظف سبق وتم اضافته من قبل")
Exit Sub
End If
Next
Dim x As Integer
dgv_employees.Rows.Add()
x = dgv_employees.Rows.Count - 1
dgv_employees(0, x).Value = ID.Text
dgv_employees(1, x).Value = Name_Emp.Text
dgv_employees(2, x).Value = ID_Emp.Text
dgv_employees(3, x).Value = grade_Emp.Text
End Sub
