چگونگی دستیابی به مقدار یک سلول در یک Data Grid

[روح اله معینی زاده]

با سلام خدمت دوستان گرامی

چه طور می توان داده‌ی موجود در سلول DataGrid را که در آن هستیم به دست آورد؟

توضیح ::نوشتن:: :
من برای انجام کاری نیاز دارم ردیفی از DataGrid را که مکان نما در آن قرار دارد، در متغیرهایی ذخیره کنم (تمام ستون‌های آن ردیف). حال چگونه می شود این کار را انجام داد؟ اگر هم بخواهم فقط ستون‌های خاصی را به مقادیرشان دسترسی داشته باشم، راه حل چیست؟

پیشاپیش متشکرم.

با احترام- خدانگهدار.

[bashir_nashi]

نام جدول : object_grid
تعداد کل رکوردها را بدست آورید.
مقدار فیلد کلید از سطر جاری (current row) را بدست آورید.
آن را در dataset جستجو کنید .
مفدار ستون مورد نظر از آن سطر را بدست آورید.



'محاسبه تعداد رکوردها
Dim all_count As Integer = object_set.Tables(0).Rows.Count
Dim i, find_i As Integer
'مقدار فیلد کد از سطر انتخاب شده از جدول را محاسبه می کند
Dim this_code As Long = object_grid.Item(object_grid.CurrentCell.RowNumber , 0)
Dim code As Long
For i = 0 To all_count - 1 'کد را در دیتاست جستجو می کند
Try
code = object_set.Tables(0).Rows(i).Item(0)
If this_code = code Then
find_i = i
Exit For
End If
Catch

End Try
Next
'فیلد نام از رکوردی که فیلد کد آن از سطر جاری جدول بدست آمده را بدست می آورد
Textbox1 = object_set.Tables(0).Rows(find_i).Item(1)

[روح اله معینی زاده]

با سلام خدمت دوست گرامی bashir_nashi

از جواب شما کمال تشکر را می نمایم.

دوست عزیز چرا وقتی با دستور

object_grid.Item(object_grid.CurrentCell.RowNumber , 0)

که شما فرموده اید می شود به مقدار یک سلول دسترسی داشت، باز در بانک اطلاعاتی دنبال آن می گردید؟

من با همین دستور اطلاعات یک سلول و یا همه سلول‌های یک خط رو به دست آوردم، ولی علت جستجو رو که شما فرمودید نفهمیدم.

با این همه از شما تشکر می کنم. موفق باشید :تشویق:

با احترام- خدانگهدار

[bashir_nashi]

سلام .

من با همین دستور اطلاعات یک سلول و یا همه سلول‌های یک خط رو به دست آوردم، ولی علت جستجو رو که شما فرمودید نفهمیدم.
من مقدار کدی را که در grid انتخاب شده را در dataset پیداکردم . به چند دلیل :
*چون ممکن است مقدار ستونی را بخواهید که در grid نمایش داده نشده باشد.
*ممکن است همه رکوردها در grid نباشد .
و . . .
موفق باشی.