修改opneQQ 内置聊天窗口名字的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 修改opneQQ 内置聊天窗口名字的问题

共有2687人关注过本帖树形打印复制链接主题：修改opneQQ 内置聊天窗口名字的问题

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/3/30 8:35:00 [显示全部帖子]

1楼代码测试没有问题。

直接赋值即可，不要定义类型

If QQClient.Ready Then

QQClient.OpenChatWindow()

End If

Dim frm = Windows.Forms.Form.ActiveForm

If frm IsNot Nothing Then

If frm.Name ="frmTalker"

vars("f") = frm

End If

vars("f").text ="xxxx 公司聊天软件"

8楼用法不行的，只有自己设计的窗口才会出现在Forms集合中

主题：修改opneQQ 内置聊天窗口名字的问题