vb.netQQ机器人 机器人编程语言

VB 聊天机器人 VB妮克帮我看下好吗 谢谢Option Explicit
Private Type QAType
Q As String
A As String
End Type
Private QAList() As QAType
Private Sub Command1_Click()
Dim I As Long
For I = 0 To UBound(QAList)
If InStr(Text1.Text, QAList(I).Q) Then
Text2.Text = QAList(I).A
Exit For
End If
Next I
If IUBound(QAList) Then Text2.Text = "对不起,我不能回答你的问题 。"
End Sub
Private Sub Form_Load()
ReDim QAList(6)'初始化对话内容数组,具体内容由自己的条目需要增加
QAList(0).Q = "你叫什么名字"
QAList(0).A = "我是聊天机器人 。"
QAList(1).Q = "你多大"
QAList(1).A = "这是秘密 , 呵呵 。"
QAList(2).Q = "你是谁"
QAList(2).A = "我是聊天机器人 。"
QAList(3).Q = "你今年多大"
QAList(3).A = "你猜啊 。"
QAList(4).Q = "你好吗"
QAList(4).A = "谢谢 , 我很好 。"
QAList(5).Q = "你好"
QAList(5).A = "你好,很高兴认识你 。"
QAList(6).Q = "你是女的"
QAList(6).A = "不,我只是一个计算机程序,用来自动回答你的问题 , 嘻嘻 。"
End Sub
问一个关于vb中post的问题 , 在做QQ机器人时发现,用inet控件get某些页面时可以,但是换成GetHeadr获取vb.netQQ机器人的是网页文件头vb.netQQ机器人,查看网页源代码就能看到vb.netQQ机器人的 。
如何制作qq聊天机器人【vb.netQQ机器人 机器人编程语言】对于拥有多个qq群的用户来说,制作一个聊天机器人是很有必要的,那么,你知道如何制作吗?下面就让我告诉你如何制作qq聊天机器人 。
制作qq聊天机器人的方法
注册图灵机器人API key,因为后面要用到图灵机器人插件来实现智能聊天 , 所以就有必要用到图灵机器人的API key了,自行到图灵机器人注册即可 。
注册非常的简单,输入邮箱、密码和验证码提交即可 , 然后在个人中心就能够看到自己申请到的API key 了,是一个32字符的字符串 。注册后,默认调用次数是2000次每天,就是每天一共能问2000次 , 我的通过下面的邀请链接邀请好友注册了,所以就多了1000次,大家如果每天的请求次数不够用,也可以用这种方法来为自己提高次数 。
下载酷Q机器人最新版及图灵机器人插件,酷Q机器人最新版和图灵机器人的插件已经打包上传至个人网盘,可直接前往网盘下载!网盘传送门:
。下载网盘中的附件 , 将附件中的两个压缩包分别解压,放至桌面或其他自己能够找到的地方 。
将图灵机器人插件中解压出来的TuRingRobot.dll放至酷Qplugin文件夹下 。
将图灵机器人插件放至相应文件夹后,点击CoolQ运行程序,启动CoolQ;在酷Q客户端中输入自己的QQ号和密码并点击登录 。
进入设置,插件,勾选图灵机器人插件 , 右下角设置进入插件设置,在弹出的窗口中能看到apikey的输入框,从上把自己申请到的apikey粘贴进去 。然后刷新插件!
看了如何制作qq聊天机器人的人还看
1. 如何制作qq头像
2. qq如何使用多人视频聊天功能
3. qq聊天怎样使用虚拟视频功能
4. 如何制作制作eip表情包
想用VB写一个QQ机器人,要能绑定一个账号,然后比如说在群里 , 通过口令可以让这个机器人做一些事,如代码让写出来vb.netQQ机器人,就有点vb.netQQ机器人,这个不可能是几句代码能写出来的 。
思路:搜索【VB获得窗口句柄】
1vb.netQQ机器人,获得窗口句柄后 , 获得窗口名称 。
2,若窗口名称是【ABC群】

推荐阅读