السلام عليكم
عندي داتا جريد فيو يتم فيها عرض الموظفين
وعند تحديد موظف معين والضغط علي بوتن الحدف يتم حدف الموظف
ثم يرجع المؤشر علي اول صف في الداتا جريد فيو
ولكن اريد ان يكون المؤشر علي اخر صف في داتا جريد فيو
(22-12-19, 12:08 PM)asemshahen5 كتب : [ -> ]كود تحديد من فظلكم .
اشكرك اخي شكرا كثيرا
زهبت للموضوع واخزت منه هدا الكود
PHP كود :
DataGridView1.SelectionMode = DataGridViewSelectionMode.FullRowSelect
DataGridView1.ClearSelection()
For I = 0 To DataGridView1.Rows.Count - 1
If DataGridView1.CurrentRow.Cells(0).Value Then
DataGridView1.Rows(I).Selected = True
End If
Next
ووضعته بعد عملية الحدف
ولكن يقوم بتحديد كل مافي الداتا جريد فيو
ارجو التعديل عليه ليقوم بتحديد اخر صف بعد عملية الحدف
بارك الله فيك
وجزاكم الله خيرا
(22-12-19, 05:10 PM)asemshahen5 كتب : [ -> ]PHP كود :
Dim LastRow As Integer = 0
If DataGridView1.AllowUserToAddRows = True Then
LastRow = DataGridView1.Rows.Count - 2
Else
LastRow = DataGridView1.Rows.Count - 1
End If
DataGridView1.Rows(LastRow).Selected = True
DataGridView1.CurrentCell = DataGridView1.Rows(LastRow).Cells(0)
كالعاده اخي عاصم
يعجز لساني عن شكرك
ولا اقول الا انك مبدع
جزاك الله خير الجزاء
الكود اشتغل تمام الحمد لله
معلش اخي عاصم عندي استفسار اخر
هل ينفع اني اجعل المؤشر يحدد الصف الدي هو قبل او بعد الصف اللي انا حدفته
يعني لو حدفت الصف الثالث يقوم بتحديد الصف الرابع وان لم يكن هناك صف رابع يقوم بتحديد الثالث وهكدا ؟
سامحني اخي علي كثرة اسئلتي
جعله الله في ميزان حسناتك
تفضل هذا الكود و انشاء الله به ما تريد .
PHP كود :
'ضع هذا الكود قبل زر الحذف'
Dim LastRow As Integer = 0
If Dgv_Table.CurrentRow.Cells(0).Value Is Nothing Or Dgv_Table.CurrentRow.Cells(0).Value = "" Or Dgv_Table.CurrentRow.IsNewRow = True Then
LastRow = Dgv_Table.CurrentRow.Index - 1
Else
LastRow = Dgv_Table.CurrentRow.Index + 1
End If
'ضع هذا الكود بعد كود الحذف'
Dgv_Table.Rows(LastRow).Selected = True
Dgv_Table.CurrentCell = Dgv_Table.Rows(LastRow).Cells(0)
(22-12-19, 05:48 PM)asemshahen5 كتب : [ -> ]تفضل هذا الكود و انشاء الله به ما تريد .
PHP كود :
'ضع هذا الكود قبل زر الحذف'
Dim LastRow As Integer = 0
If Dgv_Table.CurrentRow.Cells(0).Value Is Nothing Or Dgv_Table.CurrentRow.Cells(0).Value = "" Or Dgv_Table.CurrentRow.IsNewRow = True Then
LastRow = Dgv_Table.CurrentRow.Index - 1
Else
LastRow = Dgv_Table.CurrentRow.Index + 1
End If
'ضع هذا الكود بعد كود الحذف'
Dgv_Table.Rows(LastRow).Selected = True
Dgv_Table.CurrentCell = Dgv_Table.Rows(LastRow).Cells(0)
تسلم ياغالي
الكود اشتغل كويس ادا كان الصف المحدد هو الاول او في المنتصف
ولكن ادا كان الصف المحدد هو الصف الاخير يحدث الخطأ الاتي
[
attachment=23741]
ضع بدل -1
-2 يصلح باذن الله .