求助 If Dir(App.Path & "\" & text1.text, vbDirectory) = "&q - VB6论坛

问题点数：0 回复次数：0

求助 If Dir(App.Path & "\" & text1.text, vbDirectory) = "&q

If Dir(App.Path & "\" & text1.text, vbDirectory) = "" Then
Label7.Caption = "不存在"
' 生成

Else
Label7.Caption = "已存在"
’创建生成
End If

text1.text 显示的事当前时间 20190555 我吧这个当做目录名创建
现在判断的时候 IF老出错我的写法哪里不对？？？？

If Dir(App.Path & "\" & text1.text, vbDirectory) = "" Then

搜索更多相关主题的帖子: If　App　Path　text　text1　