Question

这是我在记事本中当前（工作）聊天机器人代码的一部分，因此您可以了解我的编码方式：

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?")

我希望能够制作“if and else”部分（例如，如果在被问到“感觉如何”之后输入“happy”，它应该说“很棒”，如果你输入任何其他内容，它会换句话说。）如何在记事本中执行此操作？

此外，我如何让它循环并根据关键词说出一些内容（例如，聊天机器人如何通过循环并引用一组关键字和响应来保持无限畅谈？）

我知道这些是非常基本的问题，但我已多次搜索网页;所有搜索都空手而归。

Answer 1

不幸的是，你问了一个非常具体的问题，很难回答。这就是为什么你的帖子收到了downvote和close down请求的原因。然而，你似乎很热情，我只能鼓励这一点。

首先，VBScript不是一个非常好的语言。哦，是的，看起来很简单，它很好地与一些标准的Windows组件集成，你可以开箱即用。但它是古老的，并且与更常见的语言有所不同。如果你想更快地完成更复杂的事情，最终你会转而使用另一种（脚本）语言。

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

将输出写入命令行

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

您可以使用

从命令行检索输出

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

让聊天机器人完成：

WScript.StdOut.Write "Hello " & name

现在你想做一些条件分支。好吧，我不是说W3Schools是一个非常好的资源，但现在已经足够了。查看他们的if ... then ... else page（＆lt; - 可点击链接）。如果你使用的是IE，你甚至可以自己尝试一些东西。

最后，您可以使用Do While ... Loop来重复代码。

像Eliza这样的聊天机器人是一个着名的项目。如果你只能构建一个非常简单的版本，请不要气馁。蛋糕是编码，而不是结果。

我在记事本中制作一个更复杂的聊天机器人时遇到了麻烦

1 个答案: