把每个词都大写

Question

我希望将该属性的值大写。看看

Public WriteOnly Property setName() As String
    Set(ByVal value As String)
        name = value
    End Set
End Property

Answer 1

您可以将StrConv与ProperCase参数一起使用。

Public WriteOnly Property setName() As String
    Set(ByVal value As String)
        Name = StrConv(value, VbStrConv.ProperCase)
    End Set
End Property