简单问题,请指点

sndy77 2004-02-18 04:09:30
Public Function IsFileExist(fstrFileName As String) As Boolean
Dim hFile As Integer
If(fstrFileName = "") Then
IsFileName = False
Exit Funtion
Else
hFile = FreeFile()
Open fstrFileName For Input Access Read As #hFile
Close #hFile
End If
End Funtion
这个函数是用来判断文件是否存在的.
可是这几句我不明白,谁能给解释一下,谢了,
hFile = FreeFile()
Open fstrFileName For Input Access Read As #hFile
Close #hFile
...全文
6 点赞 收藏 6
写回复
6 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复

还没有回复,快来抢沙发~

发帖
VB基础类
创建于2007-09-28

7479

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2004-02-18 04:09
社区公告
暂无公告