如何在Microsoft Word的VBA中使用特殊字符？

Question

我在Microsoft Word的VBA中创建了一组宏文件，作为一种CAT工具（CAT = https://en.wikipedia.org/wiki/Computer-assisted_translation ）。 问题是有些情况下我需要显示需要翻译的文本，用户需要用他自己的语言输入文本。 这可能包括一些特殊的字符，如“ăîâşţ/ĂÎŞŢ”，甚至引号或括号。 有没有办法在一些InputBox函数中使用它们？ 或者，至少，某种方式让用户在某些TextBox或其他东西中输入他需要的TextBox ？...或者我应该如何处理？...也许我需要UTF-8支持？ 或者？...任何帮助将不胜感激！...

我试过Microsoft Word的vba函数InputBox 。 我也在想，如果，也许，我可以创建我自己的InputBox ，我的条件就可以了，我也许可以有一个接受那些字符，或者所有字符变成一些字符串变量......这里StackOverflow上有人说： 是否有可能在VBA中创建一个“输入框”，可以选择多行作为输入进行文本选择？ （我指的是gizlmo的回答......）

这里有3行代码包含它（虽然它更多的是如何提问，而不是调试问题，所以那些并不是真的需要......）

MsgBox ("Ziua " & Str(ziua) & " - " & titlurien(ziua))
        titluales = InputBox("Titlul original:  " & titlurien(ziua), "Ziua: " & Str(ziua) & ", Rapsodia Realitatilor " & monthname(lunanecesara) & Str(annecesar))
        titluriro(ziua) = titluales

我希望输出正是他输入的内容，无论是引号，括号还是特殊字符（如“ăîâşţ”/“ĂÎŞŢ”）......

Answer 1

VBA InputBox将输入任何键入或粘贴的字符。 可用于键入的字符取决于最终用户已安装的Windows和Office的语言版本。

下面是我刚用你的示例字符串“ăîâşţ/ĂÎÂŞŢ”进行的测试

SpecialCharInput()
    Dim str As String
    str = InputBox("Enter you text", "Special Test Input Box")
    Debug.Print str
End Sub

在我的英语系统中，唯一的麻烦就是大小写的“ŢŢ”土耳其字符。 麻烦我的意思是它把这些字符变成问号“??” 在结果字符串中。 我敢肯定，如果我的系统支持土耳其语，那么这些字符将被识别并正确输出。