|
' ___________________________________________________
'
' � Hi-Integrity Systems 2007. All rights reserved.
' www.hisystems.com.au - Toby Wicks
' ___________________________________________________
'
''' --------------------------------------------------------------------------------
''' <summary>
''' This class is identical to DatabaseObjects except that it implements the
''' IEnumerable interface, therefore providing support for the "For Each" construct.
''' If IEnumerable is not required then inherit from DatabaseObjects. Generally,
''' inheriting from DatabaseObjectsEnumerable is preferable to DatabaseObjects as it
''' generates simpler and more readable code.
''' </summary>
''' --------------------------------------------------------------------------------
'''
Public MustInherit Class DatabaseObjectsEnumerable
Inherits DatabaseObjects
Implements IEnumerable
Protected Sub New(ByVal objDatabase As Database)
MyBase.New(objDatabase)
End Sub
Private Function GetEnumerator() As System.Collections.IEnumerator Implements System.Collections.IEnumerable.GetEnumerator
Return MyBase.ObjectsList.GetEnumerator
End Function
End Class
|
By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.
If a file you wish to view isn't highlighted, and is a text file (not binary), please
let us know and we'll add colourisation support for it.
This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.
A list of licenses authors might use can be found here
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.