我想擴展字符串功能,並添加我自己的功能到模塊。但我發現字符串類是不可繼承的。擴展字符串類的功能沒有繼承
有什麼方法可以擴展這個類。我發現是這樣的:
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
,該功能在同級別!
有什麼想法嗎?
謝謝。這真是太棒了 – DragonInCresent