VB 连接 Excel 问题 多粘贴多给分!保证有追加,

来源:百度知道 编辑:UC知道 时间:2024/05/24 04:47:54
各种连接的代码,操作代码
保证有追加,看代码数量
............

一、新建一个文件夹,该文件夹主要是用来装EXCEL工作簿、VB编译的可执行文件、图标文件及帮助文件用的。

二、打开VB,新建一个标准EXE。

三、1、对form1的设置:

Borderstyle=0-none 去掉form1的标题栏

Icon 设定图标

StartupPositio=2 将启动封面始终悬挂在屏幕中部

2、添加一个Timer控件,将其Interval设为1000,双击Timer控件出现代码窗口,输入如下代码:

Private Sub Timer1_Timer()

Dim Exl As Object

Set Exl = CreateObject("Excel.Application")

Exl.Workbooks.Open (App.Path & "\" & "DZB.xls")

Exl.Visible = True

Unload Me

End Sub

3、点击文件--生成EXE文件,将其保存到步骤一中的文件夹中去。

大功告成!

网上有电子书的,专讲vb操作excel的,自己搜去