الاعتماد على الحدث انتر في الداتا غريد فيو

السلام عليكم

اقتباس

اقصد زر الانتر بمجرد النقر عليه في احد الصفوف فانه ينتقل الى الصف الذى يليه

قد تطرق له اكثر من مرة.

اقتباس

هو انني لما كنت انقر بالماوس على صف فاغ في الداتا غريد تحت الحدث

DataGridView1_CellClick

ينهار النظام ويعطي غلط

تحقق من الفهرس قبل تفيذ النصوص التي تندرح تحت هذا الحدث بهذا الشكل.

If e.ColumnIndex <> -1 Then

بالتوفيق إن شاء الله.

مشكور اخوي بس والله بحث لساعه ونص تقريبا وما حصلت

ياليت لو تعطيني الرابط لو انتا عارف الموضوع

بالنسبه لموضوع الضغط على صف فارغ

ما فهمت عليك ياليت لو توضح اكثر لي

لانو انا مستخدم انو لو كبس على صف يرجع هدا الصف فى التكس بوكس

كيف لو كان الصف فارغ

السلام عليكم

--------------

textbox1.text = DataGridView1.Item(e.ColumnIndex, e.RowIndex).Value

بالتوفيق ان شاء الله

أو بامكانك عمل التالي

textbox1.text = DataGridView1[e.ColumnIndex, e.RowIndex].Value

شكرا لكم ياخوان

بس للاسف ما ضبط معي الكود

للعلم المطلوب نقطتين

ادا كبس بالانتر على احد الصفوف يرجع القيمه الموجوده في هدا الصف في تكست بوكس 1 و 2 في صفحه اخرى

اكرر بالانتر وليس بالماوس لان الماوس عملتها

ثاني نقطه انني عندما اكبس بالماوس على صف فانه يرجع القميمه الموجوده فيه في تكست بوكس 1و1 كما هو ماطلوب

ولكن عند النقر على صف فارغ ينهار النظام ويعطي غلط كيف احل هدي المشكله

وشكرا لكم تاني مره

السلام عليكم

شاهد النصوص البرمجية , أو حمل المرفق للمعاينة.

 Private IsEnterRow As Boolean = False

	Private Sub Form1_Load(ByVal sender As System.Object, _
	ByVal e As System.EventArgs) Handles MyBase.Load
		Me.TbTableAdapter.Fill(Me.DbDataSet.tb)
	End Sub

	Protected Overrides Function ProcessCmdKey _
	  (ByRef msg As System.Windows.Forms.Message, _
	  ByVal keyData As System.Windows.Forms.Keys) As Boolean
		Try
			If msg.WParam.ToInt32() = CInt(Keys.Enter) Then
				SendKeys.Send("{Tab}")
				IsEnterRow = True
				Return True
			End If
			Return MyBase.ProcessCmdKey(msg, keyData)
		Catch ex As Exception
			MsgBox(ex.Message)
		End Try
	End Function


	Private Sub TbDataGridView_CellClick(ByVal sender As Object, _
	ByVal e As DataGridViewCellEventArgs) Handles TbDataGridView.CellClick

		If e.ColumnIndex > -1 And e.RowIndex > -1 Then
			Dim obj As New Object
			obj = TbDataGridView(e.ColumnIndex, e.RowIndex).Value
			Me.Label1.Text = obj.ToString
		End If
	End Sub



	Private Sub TbDataGridView_CellEnter(ByVal sender As Object, _
	ByVal e As DataGridViewCellEventArgs) Handles TbDataGridView.CellEnter
		If IsEnterRow Then
			IsEnterRow = False
			Dim obj As New Object
			obj = TbDataGridView(e.ColumnIndex, e.RowIndex).Value
			Me.Label1.Text = obj.ToString
		End If
	End Sub

EnterKeyWithDataGridViewObject.rar