Foxtable(狐表)用户栏目专家坐堂 → 浏览后如何关闭EXCEL进程?


  共有3524人关注过本帖平板打印复制链接

主题:浏览后如何关闭EXCEL进程?

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/20 9:50:00 [只看该作者]

1、全局代码

 

Public open As Boolean = False
Public Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)
If open Then
    Dim axWebBrowser As Object = sender.ActiveXInstance
    Dim refmissing As [Object] = System.Reflection.Missing.Value
    Dim args As Object() = New Object(3) {}
    args(0) = 24
    args(1) = 2
    args(2) = refmissing
    args(3) = refmissing
   
    axWebBrowser.[Gettype]().InvokeMember("ExecWB", 256, Nothing, axWebBrowser, args)
End If
End Sub

 

2、打开之前,控制变open为true或false


 回到顶部
总数 12 1 2 下一页