是高级开发版。客户端具体启动是在afteropenproject中，代码如下：If Syscmd.Project.Update(False,False) = False Then '如果没有升级
QQClient.ServerIP = "隐藏"
QQClient.ServerPort = 52177
QQClient.UserName = ""
QQClient.Password = ""
If QQClient.Start() = True
Dim msg As String = "恭喜,OpenQQ登录成功!"
If QQClient.ServerMessage > "" Then
msg = msg & QQClient.ServerMessage
End If
''PopMessage(msg,"提示",PopiconEnum.Infomation,5)
Else
'PopMessage("QQClient登录失败,原因:" & vbcrlf & QQClient.ServerMessage,"提示",PopiconEnum.Error,5)
End If
加好友 
发短信
Post By：2021/10/19 16:27:00 [只看该作者]
