关于VB.NET的WinForm里UserControl不能修改属性的问题

[doraemon0711]

现在有一个VB6的项目，要升级成VB.NET，之前的ctl文件在升级的时候变成了UserControl
这个用户控件里面包含着一个TextBox，我把用户控件放到了一个工程里面，别的工程去引用这个工程然后用这个控件，
但是用的时候有一些属性修改后无效，就是在设计画面里把属性改过来了，但是Designer文件里并没有生成相应的代码，只要把设计画面重新打开一边修改的属性就刷新没了，但奇怪的是有些属性可以设置，有些不能设置

看了一下可以设置的属性都是用了用户控件里自己定义了枚举的属性，
例如:
BorderStyle可以设置

    
Public Shadows Property BorderStyle() As BorderStyle_DEF
        Get
            BorderStyle = Text1.BorderStyle
        End Get
        Set(ByVal Value As BorderStyle_DEF)
            Text1.BorderStyle = Value
            RaiseEvent BorderStyleChange()
        End Set
    End Property

ForeColor就无法设置

    
Public Shadows Property ForeColor() As System.Drawing.Color
    Get
        ForeColor = Text1.ForeColor
    End Get
    Set(ByVal Value As System.Drawing.Color)
        Text1.ForeColor = Value
        RaiseEvent ForeColorChange()
    End Set
End Property

Color没法定义成枚举啊，有什么解决办法呢