标题:FSO怎么这么多问题啊
只看楼主
yanligangylg
Rank: 1
等 级:新手上路
帖 子:84
专家分:0
注 册:2007-10-28
 问题点数:0 回复次数:1 
FSO怎么这么多问题啊
已经引用了MSR我编写下面代码
Private Sub Command1_Click()
Dim fso As New FileSystemObject, fil As File
Set fil = fso.Createfile("d:\11.txt")
End Sub
提示未找到方法或数据成员




但是我写下面的代码的时候就成功了:
Private Sub Command1_Click()
Dim fso As New FileSystemObject, fldr As folder
Set fldr = fso.Createfolder("d:\11")
End Sub

下面的代码 明明提示出现了错误“类型不匹配”为什么还建立成功了?
Private Sub Command1_Click()
Dim fso As New FileSystemObject, fldr As File
Set fldr = fso.CreateTextFile("d:\11.txt")
End Sub


请问我的问题出现在那里?
搜索更多相关主题的帖子: FSO 
2007-12-05 13:19
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
FileSystemObject类没有CreateFile方法..
所以当然是提示未找到方法或数据成员

FileSystemObject的CreateTextFile方法返回的是TextStream类..而不是File
所以当然是提示类型不匹配..

我的msn: myfend@
2007-12-05 14:25



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-190533-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.562979 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved