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的,自己搜去