从字符串“word”到类型“Boolean”的转换无效

Question

Do While Alien(0).Text = Alien(1).Text Or Alien(2).Text Or Alien(3).Text Or Alien(4).Text Or Alien(5).Text
     rand()
     Alien(0).Text = WordBank(Word)
Loop

rand() 在数组中选择一个随机词并将随机词分配给 Word 变量

Answer 1

你不能像那样比较字符串。您必须为每个 Or 重新检查 Alien(0).Text，否则它会尝试将您的字符串评估为 Boolean 值（True 或 False）。

这就是您收到错误的原因：字符串（"True" 或 "False" 除外）无法转换为 Boolean，因为编译器如何知道如何将例如 "Bear" 转换为True 或 False?

另外，最好使用OrElse，因为它是short-circuited，这意味着如果一个检查成功，它就不会再检查其余的了。

Do While Alien(0).Text = Alien(1).Text OrElse Alien(0).Text = Alien(2).Text OrElse Alien(0).Text = Alien(3).Text OrElse Alien(0).Text = Alien(4).Text OrElse Alien(0).Text = Alien(5).Text