怎样把ADO产生的recordset保存为excel文件 VB / 基础类 - CSDN社...

来源：百度文库编辑：神马文学网时间：2024/05/02 01:08:23

怎样把ADO产生的recordset保存为excel文件
qhzxcz（真想练练降龙十八掌）2001-11-23 15:12:38 在 VB / 基础类提问
问题点数：20、回复次数：1Top
foolishtiger（冬蛩）回复于 2001-11-23 15:46:56 得分 20
'要试用此例,请在窗体上加一个FlexGrid和一个按钮
'然后在代码窗体中粘贴如下代码
'在"应用"中请选择Microsoft Excel 8.0 Objects Library
Private Sub Command1_Click()
Dim lngRow As Long
Dim lngCol As Long
Dim lngN As Long
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Set xlApp = CreateObject("Excel.Application")
xlApp.WindowState = xlMaximized
xlApp.Visible = True
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlBook.Worksheets(1)
For lngRow = 1 To MSFlexGrid1.Rows - 1
For lngCol = 1 To MSFlexGrid1.Cols - 1
xlSheet.Cells(lngRow, lngCol) = MSFlexGrid1.TextMatrix(lngRow, lngCol)
Next
Next
xlApp.Visible = True
Set xlApp = Nothing
End Sub
Private Sub Form_Load()
Me.MSFlexGrid1.TextMatrix(1, 1) = "adsf"
Me.MSFlexGrid1.TextMatrix(1, 2) = "4343"
Me.MSFlexGrid1.TextMatrix(1, 3) = "bvchy"
Me.MSFlexGrid1.TextMatrix(1, 4) = "2552525"
End SubTop

怎样把ADO产生的recordset保存为excel文件 VB / 基础类 - CSDN社... ADO把Recordset导入EXCEL后打印~ VB / 数据库(包含打印，安装，报表)... excel问题：：对象sheets的方法global失败 VB / 基础类 - CSDN社... 使用ADO Recordset对象导入Excel 问专家-ADO的RECORDSET的RECORDCOUNT属性总是为-1 在VB中把EXCEL文件导入MSFLEXGRID 之二 VB.NET的文件可编译为纯EXE文件? vb ado连接远程sqlserver端口号不为1433 vb ado连接远程sqlserver端口号不为1433 如何保存SQL的money类型数据。 .NET技术 / VB.NET - CSDN社区 c... 巧用IE保存的功能保存为mht文件怎样把网上的视频保存下来? 用DLL实现把数据库的记录导出到EXCEL中(VB) - 应用程序 - VB教程如何读取收藏夹文件的URL（眩晕中..） VB / API - CSDN社区 commun... Excel [分享]EXCEL文件肥胖的的原因分析及减肥 - Excel基础应用 - Ex... VB与EXCEL的连接 VB与EXCEL的连接怎样给EXCEL文件加密？在线视频文件的保存把多个Excel文件合并到一个Excel文件的多个工作表（Sheet）里如何将文本文件保存为 BAT文件 VB利用ADO控件连接access数据库 ps生成文件的保存在线视频文件的保存46548/