扩展字符串类函数而无需继承

Question

我正在考虑扩展字符串函数并将我自己的函数添加到模块中。 但是我发现字符串类是不可继承的。

有什么办法可以扩展课程。 我发现类似：

Class MyStringType
    Dim str As String
   function toTitleCase()
     'return titlecae
   end function
End Class

Dim s As MyStringType 
s.str = "mystringgoeshere"

但这没有以正确的方式扩展，将导致：

S.Str.normalStringFunctions
S.MyOwnFunctionsHere

结果，功能不在同一级别！

任何想法？

Answer 1

您也可以在VB.NET中编写扩展方法

Module MyExtensions

    <Extension()> 
    Public Sub toTitleCase(input As String)
        ....
    End Sub
End Module

放置完“语法糖”之后，您可以将代码编写为

Dim newString = oldString.toTitleCase()

但是，我要记住您， System.Globalization.TextInfo命名空间中已经提供了ToTitleCase方法。

Answer 2

您所追求的是扩展方法 。

基本上，您不能扩展System.String ，但是可以在模块中创建子项或函数，并使编译器“伪造”它们是字符串方法。