"guy" <gu*@discussions.microsoft.com> schrieb:
In each child form I have an enumeration that maps
to the column names returned for that child class so
for example in my Person class I have an enum
Private Enum ColumnNames
NAME
ADDRESS1
ADDRESS2
...
end enum
and in my Invoices class I have an enum
Private Enum ColumnNames
INVOICE_NO
GROSS
NET
...
end enum
for consitency I would like my base class to have as this would ensure the
enum has the same name in each child class
\\\
Dim b As New Bar()
b.SelectColumn(Bar.ColumnNames.Column1)
Dim fb As New FooBar()
fb.SelectColumn(FooBar.ColumnNames.Column2)
..
..
..
Public Class Bar
Public Enum ColumnNames
Column1
End Enum
Public Sub SelectColumn( _
ByVal Column As ColumnNames _
)
MsgBox("'Bar': " & Column.ToString())
End Sub
End Class
Public Class FooBar
Inherits Bar
Public Shadows Enum ColumnNames
Column1
Column2
End Enum
Public Shadows Sub SelectColumn( _
ByVal Column As ColumnNames _
)
MsgBox("'FooBar': " & Column.ToString())
End Sub
End Class
///
--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>