تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود السجل الاخير
#1
Dim cell As Windows.Forms.DataGridViewCell = DataGridView1.Rows(0).Cells(0)
        DataGridView1.CurrentCell = cell
        DataGridView1.BeginEdit(True) 
الكود السابق كود السجل الاول 
ممكن اعرف كود السجل الاخير
الرد }}}
تم الشكر بواسطة:
#2
السجل الاول 
كود :
       Dim cell As DataGridViewCell = DataGridView1.Rows(0).Cells(0)
       DataGridView1.CurrentCell = cell
       DataGridView1.BeginEdit(True)

السجل الاخير
كود :
       Dim cell As DataGridViewCell = DataGridView1.Rows(DataGridView1.RowCount - 1).Cells(DataGridView1.ColumnCount - 1)
       DataGridView1.CurrentCell = cell
       DataGridView1.BeginEdit(True)

السجل التالى
كود :
       If ce >= DataGridView1.ColumnCount - 1 Then
           ce = 0
           If ro >= DataGridView1.RowCount - 1 Then
               ro = 0
           Else
               ro += 1
           End If
       Else
           ce += 1
       End If
       Dim cell As DataGridViewCell = DataGridView1.Rows(ro).Cells(ce)
       DataGridView1.CurrentCell = cell
       DataGridView1.BeginEdit(True)

السجل السابق
كود :
       If ce <= 0 Then
           ce = DataGridView1.ColumnCount - 1
           If ro <= 0 Then
               ro = DataGridView1.RowCount - 1
           Else
               ro += -1
           End If
       Else
           ce += -1
       End If
       Dim cell As DataGridViewCell = DataGridView1.Rows(ro).Cells(ce)
       DataGridView1.CurrentCell = cell
       DataGridView1.BeginEdit(True)

تحياتى لك
وتمنياتى لك لاتوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: احمد خطاب
#3
الف مليون شكر صديقى العزيز

Dim cmd As New OleDbCommand
       cmd = New OleDbCommand("UPDATE info SET user_fornameinfo ='" & TextBox2.Text & "', user_ genderinfo = '" & TextBox3.Text & "' WHERE user_idinfo =" & TextBox1.Text & ")", con)
       con.Open()
       cmd.ExecuteNonQuery()
       con.Close()
ممكن تعديل على هذا الكود لانه لايعمل اكون شاكر
الرد }}}
تم الشكر بواسطة: elgokr
#4
الشكر لله والحمد لله
والحمد لله على كل حال

بخصوص الكود تم الرد عليك فى موضوعك الخاص بهذا الكود
واتمنى اتمام المتابعة بهذا الموضوع وارفاق المشروع حتى يتم عمل الكود طبقاً للمساميات لديك

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: احمد خطاب



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم