Developer Programmer
پنج شنبه 14 آذر 1387, 10:38 صبح
در کلاس زیر، چی کار کنم که پارامتر Color در متد New رو با پراپرتی Color اشتباهی نگیره؟
Public Class Shape
Enum eColor
white = 1
red
green
blue
End Enum
Private fColor As eColor
Public Property Color() As eColor
Get
Return (fColor)
End Get
Set(ByVal value As eColor)
fColor = value
End Set
End Property
Public Sub New()
fColor = eColor.white
End Sub
Public Sub New(ByVal Color As eColor)
fColor = Color
End Sub
End Class
Public Class Shape
Enum eColor
white = 1
red
green
blue
End Enum
Private fColor As eColor
Public Property Color() As eColor
Get
Return (fColor)
End Get
Set(ByVal value As eColor)
fColor = value
End Set
End Property
Public Sub New()
fColor = eColor.white
End Sub
Public Sub New(ByVal Color As eColor)
fColor = Color
End Sub
End Class