VB中OLE的使用？？？？？

我在一个窗体上添加了4个OLE控件，在每个OLE控件上通过右键“特殊粘贴--粘贴链接”连接了4个图表，这些图表都在同一个excel里面(excel文件和程序在一个文件夹里)，每次程序计算时，excel里的数据会更新，我使用OLE1.action=6,所以窗体上OLE里的曲线也会更新.但是现在我遇到这样一个问题：当我把程序所在的文件夹移动到别的硬盘时，窗体上OLE的曲线不发生变化，但是移动后excel里的数据和曲线发生变化了，是不是OLE控件里链接的图表还是未移动前excel的图表，这个问题该怎么解决呢？

把“特殊粘贴--粘贴链接”改为相对路径试试
在Form_Load()中添加路径
OLE（index）.CreateLink (App.Path & "\xxx.xls")
列入OLE1装入KS4-10.xls
OLE1.CreateLink (App.Path & "\KS4-10.xls")
记得把程序和excel放在一个文件夹内App.Path表示当前程序位置