opening files

How can you set a file association so that when you open it:
It is opened into a text1 or such?

is this what your looking for??

Code:

---

Private Sub Command2_Click()
Dim i As Integer
Dim strFile As String

Open "a:Coffee.dat" For Input As #1
Do Until EOF(1)
    Input #1, strFile
    Text1(i) = strFile
    i = i + 1
Loop
End Sub

---

i mean like in vb, you double click on a project file and it opens the file in vb on the main screen instead of just opening vb and not putting the project on the main screen. Is there a way to say:

Code:

---

Form1_Load(FileName As String)
If FileName <> "" Then
Open FileName in Text1.Text
End If
End Sub

---