Loops I'；我在用记事本制作更复杂的聊天机器人时遇到了麻烦

以下是我当前（正在使用的）记事本聊天机器人代码的一部分，您可以了解我是如何编写的：

dim n, q

n=inputbox("Hello, I'm a chatbot. What is your name?")
q=inputbox(""& n &" is a great name! Thank you for activating me, "& n &"! How are you?")

我希望能够制作“如果和其他”部分（例如，如果在被问到“你感觉如何”后输入“快乐”，它应该说“很棒”，如果你输入其他内容，它会说一些不同的内容。）我如何在记事本中做到这一点

还有，我如何让它在记事本中循环并根据关键字（比如聊天机器人Eliza如何通过循环并引用一组关键字和响应来无限期地说话）说些什么

---

我知道这些都是很基本的问题，但我已经在网上搜索过很多次了；所有搜索结果都是空手而归。

不幸的是，你问了一个非常不具体的问题，很难回答。这就是你的帖子收到否决票和关闭请求的原因。然而，你似乎很热情，我只能鼓励你

首先，VBScript不是一种很好的语言。哦，是的，它看起来很简单，它与一些标准windows组件很好地集成在一起，你可以开箱即用。但它是古老的语言，在某些方面与普通语言不同。如果您想更快地完成更复杂的事情，最终您应该切换到另一种（脚本）语言

使用VBScript，不可能（轻松地）将记事本用作输入/输出设备。对于您的设置，我更喜欢命令行（按windows键并输入CMD+enter，就在这里）。 可以使用将输出写入命令行

WScript.StdOut.Write "What is your name?"

wscript.stdin.read(0)
name = wscript.stdIn.readline()

可以使用从命令行检索输出

WScript.StdOut.Write "What is your name?"

wscript.stdin.read(0)
name = wscript.stdIn.readline()

要完成聊天机器人，请执行以下操作：

WScript.StdOut.Write "Hello " & name

---

现在您需要执行一些条件分支。我不认为这是一个很好的资源，但就目前而言，这已经足够了。看看他们的（我猜你使用的是Visual Basic或VBScript？我将它保存为.vbs，所以我猜它是VBScript。