[求助]三个BOX以打开文件的控件组改为一个浏览控件Command6和一个CommanDialog1
我上次做的打字小软件里，那里面有三个BOX以打开文件的控件组，我觉得太多了，占地方，改为一个浏览控件Command6和一个CommanDialog1，照样本设置Dialog1其属性：再贴到TEXT1里面去：
Private Sub Command6_Click()
Dim st As String
Dim al As Integer
Dim re As String
Open Dialog1.FileName For Input As #1
st = ""
al = 0
While Not EOF(1)
re = Input(1, #1)
al = al + 1
st = st + re
Wend
Close #1
Text1.Text = st
End Sub
执行之，出现：
错误53，文件找不到
？？？？
