地址族不支持的问题

代码：
FileName = App.Path & "\calibration.txt"
MsgBox FileName
Open FileName For Random As #1

运行没问题，打包以后出错。
请问高手，怎么解决？谢谢！

[此贴子已经被作者于2020-4-11 10:38编辑过]