首页 /编程语言和算法/VB6/VBA/ASP
 VBA代码 FSO选择文件
2025年3月18日 14:17
Set fso = CreateObject("Scripting.FileSystemObject")
strfile = Application.InputBox("请输入文件的完整名称:", "请输入文件的完整名称:", , , , , , 2)

If fso.fileexists(strfile) Then
    MsgBox strfile & " :存在"
Else
    MsgBox strfile & " :不存在"
End If


 
全部回复(0)
首页 | 电脑版 |