vb.net如何关闭程序产生的excel进程

网上一些导入导出datagridview的程序测试成功,可是测试后发现一个问题,excel在进程中无法关闭,搜索了一下,网上提供了一些kill掉excel进程的代码,却发... 网上一些导入导出datagridview的程序测试成功,可是测试后发现一个问题,excel在进程中无法关闭,搜索了一下,网上提供了一些kill掉excel进程的代码,却发生了另外一个问题,把我正常的excel文档也给关掉了。
我的代码如下:
Try
Dim excel As Microsoft.Office.Interop.Excel.Application
excel = New Microsoft.Office.Interop.Excel.Application
excel.DisplayAlerts = False
excel.Workbooks.Add(True)
excel.Visible = False
For i As Integer = 0 To DGV4.Columns.Count - 1
excel.Cells(1, i + 1) = DGV4.Columns(i).HeaderText
Next
For i = 0 To DGV4.Rows.Count - 1
For j As Integer = 0 To DGV4.Columns.Count - 1
'MessageBox.Show("i=" & i & " j=" & j)
excel.Cells(i + 2, j + 1) = DGV4(j, i).Value
Next
Next
Dim pas As String
pas = MainForm.defpath & Date.Now.Year.ToString & Date.Now.Month.ToString & Date.Now.Day.ToString & Date.Now.Hour.ToString & Date.Now.Minute.ToString & Date.Now.Second.ToString & ".xls"
excel.Workbooks(1).SaveCopyAs(pas)
MessageBox.Show("产品数据导出成功:" & pas, "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
请问这段该如何修改才能在导出后关掉程序产生的excel进程而不关闭原来使用中的excel文档?
展开
 我来答
719366461
2017-06-07 · TA获得超过3.6万个赞
知道大有可为答主
回答量:3.6万
采纳率:22%
帮助的人:2178万
展开全部
vb.net没用过,vb6.0的话可以用getobject这种方法,你可以改改试试,看能不能用

Dim xlApp As Object
Set xlApp = GetObject(ExcelFileName).Application '获取Excel对象
匿名用户
2013-11-25
展开全部
excel.Close();
excel.Dispose();
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
一箭惊仙
2018-05-24 · TA获得超过870个赞
知道小有建树答主
回答量:1724
采纳率:62%
帮助的人:603万
展开全部
Quit后加上GC.Collect()
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
凯岩城de暹罗猫
2013-11-25 · TA获得超过145个赞
知道答主
回答量:106
采纳率:45%
帮助的人:46.2万
展开全部
我以前碰到过。
最后加这句代码。

GC.SuppressFinalize(this);
希望能解决你的问题。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
syx54
2013-11-25 · TA获得超过7378个赞
知道大有可为答主
回答量:6567
采纳率:83%
帮助的人:2733万
展开全部
通常在使用完对象,应该使用以下三个步骤,这样进程就不会存在于内存中了.

excel.ActiveWorkbook.Close()
excel.Quit()
excel = Nothing
本回答被提问者和网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
收起 更多回答(3)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式