Question

当我运行以下代码段并输入可接受的值时，我会得到所需的结果。

do while len(strselect) = 0  'or strselect<>"1" or strselect<>"2" or strselect<>"3"
strselect = inputbox ("Please select:" &vbcrlf&vbcrlf&_  
"1. Add an entry" &vbcrlf&vbcrlf&_  
"2. Remove an entry" &vbcrlf&vbcrlf&_  
"3. Search for an entry" &vbcrlf, "Contact Book")
if isempty(strselect) then
wscript.quit()
elseif strselect="1" then
wscript.echo "You chose 1"
elseif strselect="2" then
wscript.echo "You chose 2"
elseif strselect="3" then
wscript.echo "You chose 3"
end if
loop

但是，如果我尝试进一步约束验证过程（通过在do while条件中包含备注），并再次运行代码段，则会触发相应的if条件，但{{1循环继续，而不是退出。

我已经尝试在do循环isnumeric条件下使用cstr和do，没有任何喜悦......我错过了什么才能获得这个退出循环的事情？

Answer 1

条件

中的逻辑存在问题

         condition 1            condition 2       condition 3       condition 4
         v----------------v     v------------v    v------------v    v............v
do while len(strselect) = 0  or strselect<>"1" or strselect<>"2" or strselect<>"3"

根据strselect内的值，您有

value   c1      c2      c3      c4    
        len=0   <>"1"   <>"2"   <>"3"    c1 or c2 or c3 or c4
--------------------------------------   --------------------
empty   true    true    true    true            true
  1     false   false   true    true            true
  2     false   true    false   true            true
  3     false   true    true    false           true
other   false   true    true    true            true

在每一行中，您至少有一个条件评估为true，并且当您使用Or运算符连接条件时（如果至少有一个值为真，则计算结果为true），完整条件被评估为真，代码保持循环

您只需要更改条件

Do While strselect<>"1" And strselect<>"2" And strselect<>"3"
Do While Not (strselect="1" Or strselect="2" Or strselect="3")
....

验证输入框中的用户输入

1 个答案: