介绍 Access数据写入Xls文件(附源码) :
1)建立Excel文件
2)用ADO读取Access文件中的数据写入Excel文件

环境 : Windows_XP_sp2 , Office2003_sp1, VB6_sp5

'--------------------------------------------------------------------------------
'系统           : VB练习
'子系统         : Access内容写入Xls
'程序           : Access数据写入Xls文件
'创建时间       : 2005/09/11  Ver 0.0.1 CLG
'模块           : Form1
'描述           : 1)建立Excel文件
'                 2)使用ADO读取Access文件中的数据写入Excel文件
'补充说明(环境) : Windows_XP_sp2
'                 Office2003_sp1,
'                 VB6_sp5
'引用           : Microsoft ActiveX Data Objects 2.5 Library
'                 Microsoft Scripting Runtime
'                 Microsoft Excel 11.0 Object Library(Office2003自带)
'                 更具体的环境部分还可直接用记事本查看程序目录中的<工程1.vbp>文件
'--------------------------------------------------------------------------------
Option Explicit
'--------------------------------------------------------------------------------
' 过程          : Form_Load
' 描述          : 界面初始化
' 参数          : --
'--------------------------------------------------------------------------------
..........................................
..........................................
'--------------------------------------------------------------------------------
' 过程          : Form_Unload
' 描述          : 释放对象
' 参数          : --
'--------------------------------------------------------------------------------
Private Sub Form_Unload(Cancel As Integer)
    Set Form1 = Nothing '释放空间
End Sub

回复后可以下载源码

[hide]

[/hide]

[此贴子已经被作者于2005-9-21 19:24:26编辑过]

对前面的程序稍微加了一些代码的花样.

[/hide]

[此贴子已经被作者于2005-10-19 11:00:56编辑过]

                                                        
                                                        
                                        |.NET,         
                              8错!||.NET,8错!||.NE        
                      T,8错!||.NET,8错                    
              !||.NET,8错      !||.NE                    
      T,8错!||.NET,8错!||.      NET,8错                    
!||.NET,8错!||.NE            T,8错!|    |.NE              
          T,8错!||.      NET,8错!||.NET,8错!||.NE         
            T,8错!|      |.NET,8错      !||.NET,         
            8错!||.      NET,8错          !||.NE         
            T,8错!|      |.NET,8错!||.NE  T,8错!|         
            |.NET,      8错!||.  NET,8错  !||.NE         
            T,8错!|      |.NET,  8错!||.  NET,8错         
            !||.NE      T,8错    !||.    NET,8错         
            !||.NE      T,8错  !||.NE    T,8错            
            !||.NE      T,8错  !||.NE    T,8错            
            !||.NE      T,8错  !||.NE    T,8错            
      !||.NET,8错!|          |.NET,8错!|                  
        |.NET,8错            !||.NET,8错!||.              
          NET,8错          !||.NE    T,8错!||.NE         
                        T,8错!|        |.NET,8错         
                    !||.NET,            8错!||.NE        
                T,8错!||.                  NET,8错        
                                                        
                                                        
                                                  

TO : summer 当然可以,文本文件中的字符写到Excel 和 Access写进Excel基本上是一样的道理. 不同的是由于两者的类型不同打开的方式也就不同了。以下就是实现的思路: 你可以 用 OPEN 方法打开文本(注意这里 要文本的内容字段之间一定要有识别符号,如 逗号或空格等) 然后获取你要写进的字符串后按顺序写进Excel就OK了.

[此贴子已经被作者于2005-9-27 13:40:20编辑过]

是为做软件打基础而已，主要是为了学习方法为目的.

谢谢支持!!