你好,打扰您了,请问一下有关全局变量的问题,希望您能帮助我,谢谢了

在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 ' 读取文件中的数据
请问这是怎么回事,我不太明白,希望您能帮我看一下,麻烦你了,谢谢

看起来应该是你第二个窗口(读取router变量的窗口)路径拼错了吧
试试 Open router & "\G-Gx-转化数据.txt" For Input As #1来自:求助得到的回答
温馨提示:内容为网友见解,仅供参考
第1个回答  2011-04-15
。。。。啊,恐怕让你失望了,我对VB是不怎么熟悉的啊
相似回答
大家正在搜