VB文件建立问题?

[复制链接]
查看11 | 回复2 | 2011-1-31 22:40:16 | 显示全部楼层 |阅读模式
if dir("c:\a\*.*")="" then mkdir "c:\a\"if dir("c:\a\b\*.*")="" then mkdir "c:\a\b"if dir("c:\a\b\abc.txt")="" then dim i as longi=freefile()open"c:\a\b\abc.txt" for write as #iend if别忘记给予好评啊!...
回复

使用道具 举报

千问 | 2011-1-31 22:40:16 | 显示全部楼层
``````一楼的大虾,别说我抄你的呀```我也想赠点分啊```而且我觉得你检测文件夹的方法不对,```可能是我错了吧,呵呵,````楼主看代码``Private Sub Command1_Click()If Dir("d:\a", vbDirectory) = "" Then MkDir "d:\a"If Dir("d:\a\b", v...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行