Question

VB IF DIR 判断某文件是否存在，然后进行下一步

我做了一个程序，思路是:
程序运行时先判断C:\Windows\System32\ 路径下 有无一个abc.dll的文件，如果有，就打开
第二个窗体...可是无论怎样，都是判断有这个文件 ，明明是没有的啊。
我想这样，可以判断C:\Windows\System32这个路径下有abc.dll，而不是根目录...
下面是出问题的程序代码

Private Sub Form_Load()
If Dir("C:\Windows\System32\abc.dll") = " " Then
MsgBox "不存在": End
Else
MsgBox "存在": Me.Hide: Form2.Show
End If
End Sub

Answer 1

If Dir("C:\Windows\System32\abc.dll") = " " Then

改成
If Dir("C:\Windows\System32\abc.dll") = "" Then

即可

追问

好吧，我真 - -...................
采纳你了！
我是个纯菜鸟，再问大神一个啊：比如我想在12:00执行end 的动作，
该怎么写呢？

追答

在窗体添加个Timer，Enabled属性为True，Interval属性设置为1000，代码如下
If Time = "12:00:00" Then
End
Timer1.Enabled = False
End If

Answer 2

=“” 双引号间不能有空格

追问

不对啊 ！那样显示一直是不存在啊！！

追答

没有啊，我试过了一直没问题，如果显示不存在，那你先确认C:\Windows\System32 目录下有没有非隐藏的abc.dll。
Private Sub Form_Load()
If Dir("C:\Windows\System32\abc.dll") = "" Then
MsgBox "不存在": End
Else
MsgBox "存在": Me.Hide: Form2.Show
End If
End Sub