关于如何将程序中用到的excel文件一起打包进EXE文件的疑问 - 编程论坛

#2

约定的童话2021-09-16 23:39

CSV资源文件加载进来或者把工作表放云服务器

#3

cwa99582021-09-17 09:42

把excel文件放到程序的同一文件夹。
打包的时候选中这个文件。

#4

duzihanghai2021-09-17 13:53

回复 3楼 cwa9958

具体怎么操作能说的详细点吗？谢谢！

#5

约定的童话2021-09-17 14:45

回复 4楼 duzihanghai

晚点我出个教程

#6

duzihanghai2021-09-17 14:58

回复 5楼约定的童话

好的，耽误您时间了，万分感谢！

#7

西门家的猫2021-09-17 17:48

回复 6楼 duzihanghai

你怎么打包的呢？
通常用VS自带的打包软件，添加文件即可；
对了代码中将地址写成Application.StartupPath & "\" & "文件名.拓展名"即可实现相对位置连接。

#8

西门家的猫2021-09-17 17:58

只有本站会员才能查看附件，请登录

给你看看实例打包的情况

#9

duzihanghai2021-09-17 21:02

回复 8楼西门家的猫

我用的是VB6.0,有您说的这个功能吗？还是只能用VS才能实现？

#10

apull2021-09-17 22:42

完整版的vb6可以添加资源res文件的。

#11

duzihanghai2021-09-17 23:33

回复 10楼 apull

实际上程序中用到的excel文件，是由二三十个工作表组成的，如果将excel文件添加到资源文件的话，怎样在程序运行时将资源文件还原成excel文件呢？还是直接能在资源文件里面查询数据？
附件中是实际程序中用到的excel文件

只有本站会员才能查看附件，请登录

#12

duzihanghai2021-09-17 23:35

回复 2楼约定的童话

实际上程序中用到的excel文件，是由二三十个工作表组成的，如果将excel文件添加到资源文件的话，怎样在程序运行时将资源文件还原成excel文件呢？还是直接能在资源文件里面查询数据？
附件中是实际程序中用到的excel文件

只有本站会员才能查看附件，请登录

#13

duzihanghai2021-09-17 23:38

回复 7楼西门家的猫

主要是为了方便不想打包软件，因为软件本身很简单，体积也不大，只想实现直接拷贝到任何电脑上就能打开直接使用，不知道有没有什么好办法。

#14

apull2021-09-21 23:31

大概这样子

程序代码：

Private Sub Form_Load()
    Dim FileByte() As Byte'用来缓存文件内容
    Dim sName As String'要生成的文件名称
    sName = App.Path & "\temp.xlsx"
    If Dir(sName) <> sName Then'如果该文件不存在就建立它
        FileByte() = LoadResData(101, "CUSTOM")'101是资源文件号
        Open sName For Binary As #1
        Put #1, , FileByte
        Close #1
    End If
End Sub

[此贴子已经被作者于2021-9-21 23:35编辑过]

#15

duzihanghai2021-09-23 15:03

回复 14楼 apull

这是正解，经测试可用，这样做出来的绿软体积小，携带方便，是个好方法。

#16

you1578277152021-10-19 14:29

小白来过!学习了!