پیداکردن بزرگترین مقدار ستونی از دیتاگریدویو

[چیاپخش]

در یکی از فرمها یه دیتاگریدویو دارم به اسم dgvkol این کنترل در هنگام لود شدن پر میشه و یکی از ستون هاش از عدد پر میشه حال می خام با زدن دکمه btnKnew تکست باکس txtKCod با بزرگترین مقدار ستون ذکر شده پر بشه. لطفا کمک کنید ممنون میشم

[gilsoft]

در یکی از فرمها یه دیتاگریدویو دارم به اسم dgvkol این کنترل در هنگام لود شدن پر میشه و یکی از ستون هاش از عدد پر میشه حال می خام با زدن دکمه btnKnew تکست باکس txtKCod با بزرگترین مقدار ستون ذکر شده پر بشه. لطفا کمک کنید ممنون میشم

سلام دوست عزیز

روش اول :
Dim MaxVal As Double = 0
For Each Row As DataGridViewRow In DataGridView1.Rows
If Row.Cells("ColumnName").Value > MaxVal Then MaxVal = Row.Cells(0).Value
Next

روش دوم :
Dim MaxValue = (From Max In DataGridView1.Rows.Cast(Of DataGridViewRow)() Select CInt(Max.Cells("ColumnName").Value)).Max

روش سوم :
Dim DT As DataTable = DataGridView1.DataSource
Dim MaxObject As Object = DT.Compute("Max(ColumnName)", "")

موفق باشید

[rezaprogrammer]

سلام دوست عزیز

روش دوم :
Dim MaxValue = (From Max In DataGridView1.Rows.Cast(Of DataGridViewRow)() Select CInt(Max.Cells("ColumnName").Value)).Max



درود
مورد دوم کار نمی کنه. پیام میده Cast جزو RowCollection نیست.

[مهرداد صفا]

درود
مورد دوم کار نمی کنه. پیام میده Cast جزو RowCollection نیست.



سلام
در vb عملیات Cast به صورت خود کار انجام میشود و میتوانید قسمت Cast(of DataGridViewRow)() را از کد حذف کنید.

[rezaprogrammer]

سلام
در vb عملیات Cast به صورت خود کار انجام میشود و میتوانید قسمت Cast(of DataGridViewRow)() را از کد حذف کنید.

میشه شکل درستش رو بنویسی؟

[مهرداد صفا]

میشه شکل درستش رو بنویسی؟



سلام
به این صورت:

import System.Linq
'...
DimMaxValue = (From Max In DataGridView1.Rows SelectCInt(Max.Cells("ColumnName").Value)).Max

[چیاپخش]

با تشکر فراوان از همه تون که زحمت پاسخ رو کشیدین
اما یه مورد دیگه
اون ستونی که دارم و می خام بزرگترینشو برام دربیاره عددیه که صفر جلوشه مانند 005 ؛حالا من می خام کد بعدیم بشه بزرگترین به اضافه یک یعنی 006 اما این کدای بالا صفرای جلوو برمی دارن
لطفا کمک