如何在VBA中测试阿拉伯语单词是阳性还是阴性

如何在VBA中测试阿拉伯语单词是阳性还是阴性

这个词是一个字符串

对于阳性或阴性，结果应为真或假

例：变得女性化

变得阳刚

这个简单的代码根本不起作用：

Sex = "M"
If Right(word, 1) = "ة" Then Sex = "F"

---

谢谢

如果决定一个单词性别的唯一因素是它的结尾，你可以使用选择大小写的简单德语示例：

右边的数字决定要查看的字符数

Public Function isMale(aWord As String) As Boolean
    Select Case True
        Case Right(aWord, 2) = "er"
            isMale = True
        Case Right(aWord, 2) = "in"
            isMale = False
        End Select
End Function

---

到目前为止你试过什么？请出示您当前的代码。对于任何一种语言，你都会试图确定阳性或阴性的规则，然后将它们应用到这个词上。有时这可能是一种概率猜测。正则表达式通常会有所帮助。如果您能提供这些规则，我们可能会提供帮助。Rightword，1返回什么？因为阿拉伯语是RTL，你可能实际上需要Leftword，1来对应符号序列。我不会说阿拉伯语，但：1例如，在法语中，鼠标是souris：除非你不知道，否则无法猜测它是阳性还是阴性。许多其他非英语的语言也是如此。我想用阿拉伯语你会有很多这样的例外情况，你会如何处理它们？如果他们传递动词或非名词的东西怎么办？你正试图用VBA编写一本阿拉伯语词典，这很有野心，但我认为对你来说，更现实的做法是对一些在线词典进行API调用并从中获得结果。我不会说阿拉伯语，但快速的谷歌搜索似乎表明，确定性别的规则可能很复杂，而且是上下文相关的。您可能需要某种形式的查找表或基于规则的逻辑，甚至需要一个可以通过API访问的网站来请求包括性别在内的文字信息。我可以理解其中的更多细节，但可能会有所帮助。