循环式：While ... Wend

While ... Wend 其实完全与 Do While ... Loop 一样的。条件成立时循环，否则跳出。

示例：

<script language="VBScript">
<!--
    Dim ans
    ans = InputBox("请输入谷歌的英文")

    While UCase(ans)<>"GOOGLE"
        msg = "错误！" & "请重新输入谷歌的英文"
        ans = InputBox(msg)
    Wend 

    MsgBox("正确！")
//-->
</script>