gridviewsummarylist.vb

来自「gridviewhelpervb cla」· VB 代码 · 共 34 行

'------------------------------------------------------------------------------------------
' Copyright © 2006 Agrinei Sousa [www.agrinei.com]
'
' Esse código fonte é fornecido sem garantia de qualquer tipo.
' Sinta-se livre para utilizá-lo, modificá-lo e distribuí-lo,
' inclusive em aplicações comerciais.
' É altamente desejável que essa mensagem não seja removida.
'------------------------------------------------------------------------------------------

Imports System
Imports System.Collections.Generic

''' <summary>
''' Summary description for GridViewSummaryList
''' </summary>
Public Class GridViewSummaryList
	Inherits List(Of GridViewSummary)
	Public Default ReadOnly Property Item(ByVal name As String) As GridViewSummary
		Get
			Return Me.FindSummaryByColumn(name)
		End Get
	End Property

	Public Function FindSummaryByColumn(ByVal columnName As String) As GridViewSummary
		For Each s As GridViewSummary In Me
			If s.Column.ToLower() = columnName.ToLower() Then
				Return s
			End If
		Next

		Return Nothing
	End Function
End Class