寫一個vb6程式，關於檔案存在時就繼續往下執行

Question

請教如何寫一個程式
當c:\test.txt存在時
就繼續往下執行
不存在時建立text.txt檔
謝謝

根據你的程式
程式如下
怎麼執行答案就是5(debug.print)
不知那裡錯了
Private Sub Command1_Click()
j = 0
If Dir("c:\test.txt") "" Then
j = 5
Else
Open "C:\text.txt" For Output As #1
Print #1, "m"
Close #1
End If
i = 5
Debug.Print i + j
End Sub

感謝！
感謝！

Answer 1

Private Sub Command1_Click()
If Dir("c:\test.txt") <> "" Then
'繼續往下執行
Else
'建立text.txt
Open "C:\text.txt" For Output As #1

Close #1
End If
End Sub

Answer 2

感謝！感謝！

Answer 3

看一下檔名