【vb编程】怎样把数据保存到excel中

问题描述

小弟不会vb编程，特求大神给个demo，在此感谢！ 下面是我在网上找到的例子，运行报错： Dim ExcelApp As Object Private Sub Form_Unload(Cancel As Integer) Dim X As Integer X = MsgBox("是否保存更改？", vbYesNoCancel + vbExclamation, "VB 保存数据到中 Excel") If X = 6 Then '单击“是”则保存 Set ExcelApp = CreateObject("Excel.Application") ExcelApp.Workbooks.Add With ExcelApp.ActiveSheet .Range("A1:J1") = Array(Text1(0).Text, Text1(1).Text, Text1(2).Text, Text1(3).Text, Text1(4).Text, Text1(5).Text, Text1(6).Text, Text1(7).Text, Text1(8).Text, Text1(9).Text) .Range("A2:J2") = Array(Text1(10).Text, Text1(11).Text, Text1(12).Text, Text1(13).Text, Text1(14).Text, Text1(15).Text, Text1(16).Text, Text1(17).Text, Text1(18).Text, Text1(19).Text) MyFileName = ExcelApp.GetSaveAsFilename(fileFilter:="Excel Files (*.xls), *.xls") .SaveAs MyFileName End With ExcelApp.Quit ElseIf X = 7 Then '单击“否”则不保存 Cancel = 0 Else '单击“取消”则不退出程序 Cancel = 1 End If End Sub

解决方案

代码写的是不错的

时间： 2024-09-26 11:02:15

【vb编程】怎样把数据保存到excel中的相关文章

用C#程序怎么读出的数据保存到excel中,高手请指点!!!

问题描述 我需要保存到excel中的数据有字段,而且可以实现分页,后生有礼,先谢了!!! 解决方案 解决方案二:1.用报表控件2.用office对象编程.解决方案三:privatestringdownloadToServer(DataSetds,stringtemplateFileName){Excel.ApplicationmyExcel=null;objectmissing=System.Reflection.Missing.Value;Excel.WorkbooksmyWorkBooks=

如何在C++中将数据库数据分行和列保存到Excel中

如何在C++中将数据库数据分行和列保存到Excel中? 程序中的数据在StringGrid控件中显示的,那如何按照StringGrid显示的格式分行分列保存到Excel表格呢?请看如下两种方法的实现: 第一种方法:采用的一格一格填充数据 Variant ExcelApp,WorkBook1,WorkSheet1; //--------------------------------------------------------------------------- __fastcall TFo

如何将List的数据保存到XML中

问题描述 如何将List的数据保存到XML中求代码!!!!!!!!! 解决方案 解决方案二:PrintWriterout=response.getWriter();StringBufferstrBuffer=newStringBuffer();strBuffer.append("<?xmlversion="1.0"encoding="UTF-8"?>")strBuffer.append("<root>"

数据存储-vs提取数据保存到mysql中的问题

问题描述 vs提取数据保存到mysql中的问题 http://bbs.csdn.net/topics/391066391 解决方案 先吧你的存入数据都转换成字符串.然后存入nvarchar等数据库字段.这样字符串是可以的. SQL语句语法也要检测一下. 解决方案二: MYSQl数据库对字段长度有限制.最好使用text来存大字段.略长的可以用char(255)嫌占空间的话用varchar 解决方案三: 是不是你的字符串存在的特殊字符存在 解决方案四: 没人????????

如何把数据库中的数据保存到Collection中？

问题描述 如何把数据库中的数据保存到Collection中?struts的select下拉框怎样显示从数据库中取出来的数据项?最好能贴出源代码,谢谢! 解决方案 解决方案二:ResultSetrs="从数据库中查询出来的结果集";Collectionlist=newArrayList();try{while(rs.next()){list.add(rs.getString(1));}request.setAttribute("list",list);}catch(S

将数据库数据读出到DataGrid然后保存到excel中

datagrid|excel|数据|数据库   我先给出部份程序的解释,然后给出整个源代码.    DataSet objDataset = new DataSet();   objConn = new SqlConnection(ConfigurationSettings.AppSettings["ConnectionSqlServer"].ToString());   objConn.Open();//在web.config中的配置文件.   SqlDataAdapter objA

将MSHFlexGrid中的数据保存到Excel表

       一直放着导出为Excel的这一步,以前一直觉得这个应该不好做吧,但是今天把代码写出来,才觉得没有想象的那么难.        首先,引用对象:Microsoftexcel 14.0 object library             接下来就是代码的设置了:     Dim TempExcel As Excel.Application '声明一个Excel工作表 Dim TempSheet As Excel.Worksheet '声明一个excel工作簿 Dim TempRow

c#-如何把datagridview中的数据保存到SQL数据库中？VB.NET或C#

问题描述 如何把datagridview中的数据保存到SQL数据库中?VB.NET或C# 如下图:已经实现从EXCEL导入数据到Datagridview中,现在要把其中的数据保存到数据库的AAAie表里面.请用代码说明,谢谢. 解决方案 取数据用ado.net保存到SQL Server数据库.http://blog.csdn.net/lysc_forever/article/details/7697536 解决方案二: 方法1.创建一个数据库,表,表名自取,表的字段和Excel相同,取Excel

问高手，vb.net如何抓屏并且自动保存到excel里面呢

问题描述 问高手,vb.net如何抓屏并且自动保存到excel里面呢比较好的写法. 解决方案 解决方案二:抓屏返回图片?然后粘贴到excel?解决方案三:好强大解决方案四:该回复于2011-12-26 09:58:29被版主删除