程序被其他程序调用后不能找到文件.txt

VB技巧问答10000例 VB技巧问答10000例

估 计 你 的 所 有 动 画 和 声 音 文 件 都 是 单 独 存 放 的 ， 而 不 是 编 译 到 EXE中 的 。 你 的 程 序 单 独 运 行 时 ， 一 般 系 统 以 你 的 程 序 所 在 目 录 为 当 前 目 录 ， 而 VB使 用 Shell语 句 时 ， 系 统 一 般 以 使 用 Shell语 句 的 VB程 序 的 目 录 为 当 前 目 录 。 这 种 变 化 将 影 响 到 你 的 程 序 的 运 行 。 你 有 两 个 办 法 解 决 ： 
    1、 使 用 下 列 语 句 改 变 当 前 目 录 ： 
    ChDrive App.Path 
    ChDir App.Path 
    2、 在 打 开 文 件 和 调 用 API语 句 的 时 候 ， 都 指 定 全 路 径 ， 你 可 以 使 用 App.Path获 得 程 序 所 在 的 目 录 。 
<END>