回 帖 发 新 帖 刷新版面

主题:请问  能否用字符串变量作为要打开文件的文件名

假设文件在D盘
dim Filename as string
S = 输入的字符串
Filename = "D:\" & Filename & ".txt"
Open Filename for Random as #1 


这样的程序不能执行,执行后提示找不到文件或是别的错误

我不知道这个程序为什么不能执行,很不明白,希望解答一下


期待各位前辈的解答

回复列表 (共6个回复)

沙发

Open sFile For OutPut As #1
OR
For Binary

板凳


你的意思是,不能打开随即文件吗?
SFILE是什么意思??


我不是很明白

3 楼

s 是变量类型
File 是变量意义。
sFile = "c:\name.txt"

4 楼

Random也没问题呀

Private Type TEST
    a As Byte
    b As Long
End Type

Private Sub Form_Load()
    Dim sFile As String
    sFile = "D:\test.txt"
    
    Dim tt As TEST
    tt.a = Asc("K")
    tt.b = 14958
    
    Open sFile For Random As #1
        Put #1, , tt
    Close #1
    Open sFile For Random As #1
        Get #1, , tt
    Close #1
    Debug.Print Chr(tt.a), tt.b
    
    End
End Sub

结果为:K              14958 

完全正确


你的"或是别的错误"是什么意思?

5 楼

可能它这个文件是顺序文件,你尝试用记事本打开它,如果能见到内容,则是顺序文件,如果是随机文件,则是看不到内容。

6 楼


谢谢各位的解答,我的问题解决了
[em11]

我来回复

您尚未登录,请登录后再回复。点此登录或注册