在vb中一个窗口定义了一个router路径,
name = Text2.Text
router = "D:\X轴\" & name
If Dir(router, vbDirectory) = "" Then '‘判断是否已经存在同名的文件夹,为空值则新建
MkDir router
Set myFile(12) = MyFso.CreateTextFile(router & "\G-Gx-转化数据.txt", True)
Set myFile(13) = MyFso.CreateTextFile(router & "\G-Gy-转化数据.txt", True)
Set myFile(14) = MyFso.CreateTextFile(router & "\G-Gz-转化数据.txt", True)
Set myFile(15) = MyFso.CreateTextFile(router & "\采集时间.txt")
而且定义了在模块中定义了全局变量
Option Explicit
Public router As String
但是在另一个窗口中引用router并提取里面的数据时提示错误却是“路径为找到”如下
Open "router\G-Gx-转化数据.txt" For Input As #1 ' 读取文件中的数据
请问这是怎么回事,我不太明白,希望您能帮我看一下,麻烦你了,谢谢