1. vb导出到excel的方法

我知道两个方法。

1、如果EXCEL数据不多可以用这个方法。workbooks.open(“路径")打开EXCEL，再逐个的用INSERT语句导入到ACCESS里面。

2、就是EXCEL本身也是一个数据库，第一行是字段，用连接数据库的方式连接EXCEL直接一条SQL导入到SQL。这对格式有点要求，就是第一行必须是字段，数据比较整齐。

2. vb怎么导出代码

Dim p1 As New Point(0, 0)Dim p2 As New Point(My.Computer.Screen.WorkingArea.Width, My.Computer.Screen.WorkingArea.Height) '除工具栏全屏Dim pic As New Bitmap(p2.X, p2.Y)Using g As Graphics = Graphics.FromImage(pic)g.CopyFromScreen(p1, p1, p2)PictureBox1.Image = picEnd UsingClipboard.SetImage(PictureBox1.Image)截图到PictureBox1中显示，然后在把PictureBox1.image放到剪切板中

3. vb把access数据库导出excel

做2个ado连接，一个连到数据库，一个连到excel，然后读写数据。

4. vb怎么导出文件

1、打开含有宏的工作薄，点“工具/宏/宏(M)

选中你的宏，点“编辑”

这样就调出了VB编辑器界面。

2、点“文件/导出文件”，在“文件名”框中输入一个文件名(也可用默认的文件名)，注意扩展名为“bas

点“保存”。

3、将扩展名为“。bas”的文件拷贝到另台电脑，打开 EXECL,点“工具/宏/VB编辑器”，调出VB编辑器界面，点“文件/导入文件”，找到你拷贝过来的文件，点“打开”，退出VB编辑器，你的宏已经复制过来了。

5. vb导入excel到数据库

Option ExplicitDim data As New ADODB.ConnectionDim db As New ADODB.RecordsetDim xlsApp As Excel.ApplicationDim xlsBook As Excel.WorkbookDim xlsSheet As Excel.WorksheetPrivate Sub Command1_Click()On Error GoTo ErrHandlerCommonDialog1.DialogTitle = "Open files"CommonDialog1.Filter = "mdb files(*.mdb)|*.mdb"CommonDialog1.Flags = 4 '取消 “以只读方式打开” 复选框CommonDialog1.ShowOpenCommonDialog1.CancelError = TrueIf Len(CommonDialog1.FileName)

6. vb导出excel格式保存

可以，你试一下：

Dim exlApp As Excel.Application

Dim exlBook As Excel.Workbook

Set exlApp = New Excel.Application

exlApp.Visible = True '显示Excel窗口

Set exlBook = exlApp.Workbooks.Open(App.Path + "\test.xls") 'Excel文件路径及文件名

'向Excel表中写入数据，Sheets(1)为第1个工作表，Cells(行号,列号)是单元格

exlApp.Sheets(1).Cells(1, 1) = "11"

exlApp.Sheets(1).Cells(1, 2) = "12"

exlApp.Sheets(1).Cells(2, 1) = "21"

exlApp.DisplayAlerts = False '不显示警告信息

exlBook.Close True '先保存修改再关闭工作簿

exlApp.Quit '关闭Excel

补充回答：

我也放在窗体关闭事件中试了一下，不会死机呀。你有没有在“工程-引用”中勾选“Microsoft Exel 11.0 Object Library”选项？会不会与Excel的版本有关？我用的是Office XP专业版。 还有一点，你要直接运行本程序的话，还必须先在工程目录中新建一个"test.xls"文件。

7. vb读取数据库

一）操纵数据库，VB必须正确使用SQL结构化查询语句，将其赋值给ADO数据控件的RecordSource属性。

二）拼接SQL结构化查询语句的条件部分的判断语句结构应该是简洁有效。

已将原按钮的Click事件代码修改为能有效给ADO数据控件RecordSource属性，去完成数据查询。

SQL结构化查询语句

结构化查询语言(Structured Query Language)简称SQL(发音：/ˈes kjuː ˈel/ "S-Q-L")，是一种特殊目的的编程语言，是一种数据库查询和程序设计语言，用于存取数据以及查询、更新和管理关系数据库系统；同时也是数据库脚本文件的扩展名。

结构化查询语言是高级的非过程化编程语言，允许用户在高层数据结构上工作。它不要求用户指定对数据的存放方法，也不需要用户了解具体的数据存放方式，所以具有完全不同底层结构的不同数据库系统, 可以使用相同的结构化查询语言作为数据输入与管理的接口。结构化查询语言语句可以嵌套，这使它具有极大的灵活性和强大的功能。

Option Explicit Dim strsql As StringPrivate Sub find_Click() If Trim(name_find.Text) <> "" And Trim(phone_find.Text) <> "" Then strsql = "select * from phone where " + "电话号码='" & Trim(phone_find.Text) & "'" + " and 姓名='" & Trim(name_find.Text) & "'" End If Adodc1.RecordSource = strsql Debug.Print Adodc1.RecordSourceEnd Sub

立即窗口显示正确的SQL语句。

8. vb 导出excel

你是指利用Excel内置的VBA进行编程还是指用VB编的程序来处理Excel文档或控制Excel？如果是前者，那么你按Alt+F11打开VB界面输入代码即可开始编程。后者则可以把Excel文档或Excel应用程序作为对象进行相应操作。至于具体如何做，那就不是这里一两句话能说清的，甚至一两本书的容量也不一定说得完。

你可以自己查看Excel和VB的相关帮助文档或者到微软的MSDN网站寻求帮助。

9. vb如何导入数据

每读入一个,就与数据库中的对比一次,看是否重复.. 能判断一个,通过循环就能够判断多个.

10. vb数据导出到excel

VB本身的自动化功能就可以实现，其方法如下：

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