RichTextBox 全角引號變成半角解決方法

Private Function ReplaceRtfFullQuotes(ByVal TextRTF As String) As String     Dim sText As String             sText = Replace(TextRTF, "\ldblquote ", "「")     sText = Replace(sText, "\ldblquote", "「")

>>阅读原文<<