محتاج كود انتقال - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182) +--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183) +--- الموضوع : محتاج كود انتقال (/showthread.php?tid=51028)

محتاج كود انتقال - خالد كامل1 - 21-01-25 السلام عليكم ورحمة الله عندى نظام كاشير فى فاتوره المبيعات عند اختيار اصناف الفاتوره استعمل جهاز القارئ  من داخل الداتا جريد فيو طليى احبتى فى الله اريد كود عندما يقرأ الباركود ينتقل مباشرة الى الصف التالى فى خلية الباردكود للصنف ولكم منى جزيل الشكر RE: محتاج كود انتقال - خالد كامل1 - 22-01-25 من فضل اخواتى الاحبة ارجو الرد RE: محتاج كود انتقال - قناص المدينة - 22-01-25 Private Sub DataGridView1_CellEndEdit(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit   ' تحقق مما إذا كانت الخلية الثانية (العمود الثاني) قد تم تعبئتها     If e.ColumnIndex = 1 Then ' العمود الثاني (العمود الأول هو 0)         Dim cellValue As String = DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value.ToString()         ' تحقق مما إذا كانت الخلية غير فارغة         If Not String.IsNullOrWhiteSpace(cellValue) Then             ' الانتقال إلى الصف التالي             If e.RowIndex < DataGridView1.Rows.Count - 1 Then                 DataGridView1.CurrentCell = DataGridView1.Rows(e.RowIndex + 1).Cells(0) ' الانتقال إلى أول خلية في الصف التالي             End If        End If    End If End Sub