为什么别人的VB中可以使用Trim函数，而我的VB中使用起来就出错了！大侠请回答！！！
[问题点数：80分，结帖人shines]
为什么别人的VB中可以使用Trim函数，而我的VB中使用起来就出错了！大侠请回答！！！
[问题点数：80分，结帖人shines]
不显示删除回复
显示所有回复
显示星级回复
显示得分回复
只显示楼主
2001年6月 VB大版内专家分月排行榜第一2001年1月 VB大版内专家分月排行榜第一
2001年5月 VB大版内专家分月排行榜第二2001年4月 VB大版内专家分月排行榜第二2001年3月 VB大版内专家分月排行榜第二2000年12月 VB大版内专家分月排行榜第二2000年11月 VB大版内专家分月排行榜第二
2001年6月 VB大版内专家分月排行榜第一2001年1月 VB大版内专家分月排行榜第一
2001年5月 VB大版内专家分月排行榜第二2001年4月 VB大版内专家分月排行榜第二2001年3月 VB大版内专家分月排行榜第二2000年12月 VB大版内专家分月排行榜第二2000年11月 VB大版内专家分月排行榜第二
2001年7月 扩充话题大版内专家分月排行榜第二
2000年12月 VB大版内专家分月排行榜第三
本帖子已过去太久远了，不再提供回复功能。VBGood网站全文搜索
搜索VBGood全站网页(全文搜索)
论坛最新话题
作者：, 回复：2, 阅读：219, 日期： 作者：, 回复：9, 阅读：110, 日期： 作者：, 回复：1, 阅读：127, 日期： 作者：, 回复：2, 阅读：126, 日期： 作者：, 回复：1, 阅读：102, 日期： 作者：, 回复：1, 阅读：76, 日期： 作者：, 回复：2, 阅读：330, 日期： 作者：, 回复：3, 阅读：235, 日期： 作者：, 回复：3, 阅读：225, 日期： 作者：, 回复：2, 阅读：355, 日期： 作者：, 回复：1, 阅读：366, 日期： 作者：, 回复：7, 阅读：398, 日期： 作者：, 回复：2, 阅读：421, 日期： 作者：, 回复：2, 阅读：342, 日期： 作者：, 回复：2, 阅读：464, 日期： 作者：, 回复：6, 阅读：382, 日期： 作者：, 回复：5, 阅读：418, 日期： 作者：, 回复：3, 阅读：384, 日期： 作者：, 回复：1, 阅读：262, 日期： 作者：, 回复：1, 阅读：314, 日期：
VBGood RSS 订阅
每周超过200个关于VB编程的精彩新话题，现在就订阅吧！
论坛历史精华
为VBGood提供空间用VB也可以做绿色软件_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
用VB也可以做绿色软件
上传于||文档简介
&&用​V​B​也​可​以​做​绿​色​软​件
阅读已结束，如果下载本文需要使用0下载券
想免费下载更多文档？
下载文档到电脑，查找使用更方便
还剩6页未读，继续阅读
你可能喜欢> 请教各位大侠，关于VB操作EXCEL表格的问题。急，谢谢我想用VB6做个程序来控制EXCEL表格，
请教各位大侠，关于VB操作EXCEL表格的问题。急，谢谢我想用VB6做个程序来控制EXCEL表格，
oujiawei & &
发布时间： & &
浏览：13 & &
回复：2 & &
悬赏：0.0希赛币
请教各位大侠，关于VB操作EXCEL表格的问题。急，谢谢！我想用VB6做个程序来控制EXCEL表格，我能用语句将EXCEL文件打开，但是不知道怎样才能在指定的“Sheet”中插入文字，请各位帮忙，多谢！
一、 VB读写EXCEL表：
　　VB本身提自动化功能可以读写EXCEL表，其方法如下：
　　1、在工程中引用Microsoft Excel类型库：
　　从 &工程 &菜单中选择 &引用 &栏；选择Microsoft Excel 9.0 Object Library（EXCEL2000），然后选择 &确定 &。表示在工程中要引用EXCEL类型库。
　　2、在通用对象的声明过程中定义EXCEL对象：
Dim xlApp As Excel.Application
Dim xlBook As Excel.WorkBook
Dim xlSheet As Excel.Worksheet
　　3、在程序中操作EXCEL表常用命令：
Set xlApp = CreateObject( &Excel.Application &)
'创建EXCEL对象
Set xlBook = xlApp.Workbooks.Open( &文件名 &)
'打开已经存在的EXCEL工件簿文件
xlApp.Visible = True
'设置EXCEL对象可见（或不可见）
Set xlSheet = xlBook.Worksheets( &表名 &)
'设置活动工作表
xlSheet.Cells(row, col) =值
'给单元格（row,col）赋值
xlSheet.PrintOut
'打印工作表
xlBook.Close (True)
'关闭工作簿
xlApp.Quit
'结束EXCEL对象
Set xlApp = Nothing
'释放xlApp对象
xlBook.RunAutoMacros (xlAutoOpen)
'运行EXCEL启动宏
xlBook.RunAutoMacros (xlAutoClose)
'运行EXCEL关闭宏
　　4、在运用以上VB命令操作EXCEL表时，除非设置EXCEL对象不可见，否则VB程序可继续执行其它操作，也能够关闭EXCEL，同时也可对EXCEL进行操作。但在EXCEL操作过程中关闭EXCEL对象时，VB程序无法知道，如果此时使用EXCEL对象，则VB程序会产生自动化错误。形成VB程序无法完全控制EXCEL的状况，使得VB与EXCEL脱节。
　　二、 EXCEL的宏功能：
　　EXCEL提供一个Visual Basic编辑器，打开Visual Basic编辑器，其中有一工程属性窗口，点击右键菜单的 &插入模块 &，则增加一个 &模块1 &，在此模块中可以运用Visual Basic语言编写函数和过程并称之为宏。其中，EXCEL有两个自动宏：一个是启动宏（Sub Auto_Open()），另一个是关闭宏（Sub Auto_Close()）。它们的特性是：当用EXCEL打含有启动宏的工簿时，就会自动运行启动宏，同理，当关闭含有关闭宏的工作簿时就会自动运行关闭宏。但是通过VB的自动化功能来调用EXCEL工作表时，启动宏和关闭宏不会自动运行，而需要在VB中通过命令xlBook.RunAutoMacros (xlAutoOpen)和xlBook.RunAutoMacros (xlAutoClose) 来运行启动宏和关闭宏。
　　三、 VB与EXCEL的相互勾通：
　　充分利用EXCEL的启动宏和关闭宏，可以实现VB与EXCEL的相互勾通，其方法如下：
　　在EXCEL的启动宏中加入一段程序，其功能是在磁盘中写入一个标志文件，同时在关闭宏中加入一段删除此标志文件的程序。VB程序在执行时通过判断此标志文件存在与否来判断EXCEL是否打开，如果此标志文件存在，表明EXCEL对象正在运行，应该禁止其它程序的运行。如果此标志文件不存在，表明EXCEL对象已被用户关闭，此时如果要使用EXCEL对象运行，必须重新创建EXCEL对象。
　　四、举例：
　　1、在VB中，建立一个FORM，在其上放置两个命令按钮，将Ｃommand1的Caption属性改为EXCEL，Command2的Caption属性改为End。然后在其中输入如下程序：
Dim xlApp As Excel.Application
'定义EXCEL类
Dim xlBook As Excel.Workbook
'定义工件簿类
Dim xlsheet As Excel.Worksheet
'定义工作表类
Private Sub Command1_Click()
'打开EXCEL过程
　If Dir( &D:\temp\excel.bz &) =
'判断EXCEL是否打开
　　Set xlApp = CreateObject( &Excel.Application &)
'创建EXCEL应用类
　　xlApp.Visible = True
'设置EXCEL可见
　　Set xlBook = xlApp.Workbooks.Open( &D:\temp\bb.xls &)
'打开EXCEL工作簿
　　Set xlsheet = xlBook.Worksheets(1)
'打开EXCEL工作表
　　xlsheet.Activate
'激活工作表
　　xlsheet.Cells(1, 1) =
'给单元格1行驶列赋值
　　xlBook.RunA
oujiucfan & &
& & （0）（0）Set xlApp = CreateObject( &Excel.Application &)
'创建EXCEL对象
Set xlBook = xlApp.Workbooks.Open( &文件名 &)
'打开已经存在的EXCEL工件簿文件
xlApp.Visible = True
'设置EXCEL对象可见（或不可见）
Set xlSheet = xlBook.Worksheets( &表名 &)
'设置活动工作表
xlSheet.Cells(row, col) =值
'给单元格（row,col）赋值
你需要引用MS-EXCEL9.0 或者10.0oujiucfan & &
& & （0）（0）
本问题标题：
本问题地址：
温馨提示：本问题已经关闭，不能解答。
暂无合适的专家
&&&&&&&&&&&&&&&
希赛网 版权所有 & &&}