Public Sub GetTitleProductReplace As String
Dim sf1 As StringFunctions
Dim cs1 As CSBuilder
sf1.Initialize
cs1.Initialize
cs1.Typeface(Typeface.MATERIALICONS).Append(Chr(0xE86A)).Typeface(Typeface.DEFAULT).Append(sf1.AddSpaces(3))
cs1.Typeface(Typeface.DEFAULT).Append("MyText").PopAll
cs1.PopAll
Return cs1
End Sub