| 编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛
全能ASP/PHP/ASP.NET主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付买域名,送MP3、MP4
高端软件开发 = 年薪十万不是梦赛孚耐:软件保护加密专家身份认证令牌USB KEY买空间,免费送域名(厦门中资源)
共有 250 人关注过本帖
标题:求VB与Excel进程问题
收藏  订阅  推荐  打印 
crzzx
Rank: 1
等级:新手上路
帖子:5
积分:152
注册:2008-7-8
求VB与Excel进程问题

我想把VB中的数据保存在Excel中,我用的一个开始和结束按钮,但是当我按下结束按钮时,Excel并没有在进程中消失
,除非我把整个程序给结束了才可以终止Excel这个进程,可我又不能终止整个程序的运行,问下高手有什么方法可以在不用
终止程序的情况下就可以结束Excel进程。下面是我的程序代码:
Dim exApp  As Excel.Application
Private Sub start_Command_Click()
  Set exApp = New Excel.Application
   CommonDialog1.Filter = "Excel 表|*.xls"
     CommonDialog1.ShowOpen
      If Len(CommonDialog1.FileName) >= 1 Then
    exApp.Workbooks.Open CommonDialog1.FileName
    Range(Cells(1, 1), Cells(1, 1)) = "采集的温度"
   Range(Cells(1, 2), Cells(1, 2)) = "P(比例系数)"
   Range(Cells(1, 3), Cells(1, 3)) = "I(积分系数)"
   Range(Cells(1, 4), Cells(1, 4)) = "D(微分系数)"
   exApp.ActiveWorkbook.Save
    exApp.ActiveWorkbook.Close
      End If
End Sub
Private Sub stop_Command_Click()
   exApp.Quit
   Set exApp = Nothing
End Sub
望大家给点意见!
搜索更多相关主题的帖子: Excel进程  Cells  exApp  Range  
2008-7-14 09:06
随风逐流
Rank: 8Rank: 8
来自:passerby
等级:论坛元老
威望:8
帖子:3893
积分:40493
注册:2007-6-13

正常情況是可以關的


I am a wanderer. Oftentimes it seems that I walk the earth among pygmies. PS:換號使用中
2008-7-14 11:27
crzzx
Rank: 1
等级:新手上路
帖子:5
积分:152
注册:2008-7-8
回复 2# 随风逐流 的帖子

我发现好多人都遇到类似这样的问题,可我严格按照这样操作就不能结束Excel进程.
2008-7-14 14:33
随风逐流
Rank: 8Rank: 8
来自:passerby
等级:论坛元老
威望:8
帖子:3893
积分:40493
注册:2007-6-13

對的
在一般情況是可以關掉的
不一般的情況是:在VB裡面還沒結束EXCEL進程,你在外面打開EXCEL或操作EXCEL就會導致VB裡面無法結束進程
關於這個問題,你只能優化你的代碼,儘量程序操作完EXCEL就結束進程,下次要用再打開


I am a wanderer. Oftentimes it seems that I walk the earth among pygmies. PS:換號使用中
2008-7-14 14:37
关于我们 | 广告合作 | 编程中国 | 清除Cookies | Archiver | WAP | TOP

编程中国 版权所有,并保留所有权利。鲁ICP备08000592号
Powered by Discuz, Processed in 0.051128 second(s), 9 queries.
Copyright©2004-2008, BCCN.NET, All Rights Reserved