1、首先为对话框新建变量
Dim a1 As Integer
Dim str1 As String
2、为变量赋值
str1 = "与交谈中"
'窗体标题
3、调用关闭窗口函数
a1 = icePub_closeForm(str1)
可以试试用关闭弹出窗口的方法
Private Declare Function icePub_closeForm Lib "icePubDll.dll" (ByVal strFormTitle As String) As Integer
Dim a2 As Integer
Dim str1 As String
str1 = "与 龙芯发烧友 交谈中"
'QQ聊天窗体标题
a2 = icePub_closeForm(str1)
我想除了C#和.net,一般的编程语言都做不到
用Silent属性试试
下载文件