主题：如何在内置聊天窗用代码发送文件、消息

 参考

http://www.foxtable.com/webhelp/scr/3033.htm

方法一：做个菜单 http://www.foxtable.com/webhelp/scr/3076.htm

方法二：自己做个发送按钮。

在内置的聊天窗口内，你只能新增菜单，如 http://www.foxtable.com/webhelp/scr/3076.htm

直接说你想做什么功能吧。

这个做不到，除非自定义一个聊天窗口。

复杂，比如你要做成和【内置聊天】一样，就很麻烦。

目前，内置聊天窗口发送文字、发送图片等操作，都不会触发对应的事件，做不到你要做的功能。

http://www.foxtable.com/webhelp/scr/1796.htm

1、登陆窗口设置成模式窗口；

2、AfterOpenProject事件写代码

Forms("窗口1").Show

你的主窗口设置成模式窗口。在afterOpenProject打开登陆窗口，登陆后打开主窗口

afterOpenProject事件

Forms("登陆").Show

basemainform.Close

全局代码

Public Sub Form_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs)
    Forms("登陆").Close
End Sub

afterOpenProject事件

Forms("登陆").Show

basemainform.Close

登陆窗口登陆按钮执行

Forms("登陆").BaseForm.opacity = 0

qqClient.OpenChatWindow

Dim frm As windows.forms.form = Application.OpenForms("frmTalker")
If frm IsNot Nothing Then
    addhandler frm.closed, addressof Form_Click
End If