关于文件的问题。进来帮下忙吧！谢！急！

[lbsoftware]

我在一个窗体中，如果在DTPicker1,DTPicker2我设置了两个时间，
放假日期：2003-8-1
开学日期：2003-9-1
我想把这个两个时间写到一个文件中(date.inf).如果做。同时如何再分别取出来？
我把这想把这个文件放在存放此工程和路径下。
我对文件一点不懂，希望大家帮帮我。用点时间来教我。谢谢了！！！！

[射天狼]

Private Sub Form_Load()
Dim path As String, data1 As String data2 as String

path = App.path & IIf(Right(App.path, 1) = "\", "", "\") & "date.inf"

'写数据
Open path For Output As #1
Print #1, "放假日期：2003-8-1"
Print #1, "开学日期：2003-9-1"
Close #1

'读数据
Open path For Input As #1
Input #1, data1
Input #1, data2

Close #1
End Sub

[lbsoftware]

谢！但，我如果让 text3显示第二行的内容？

[tomyhenry]

?

[yijiansong]

open filename for output as #1
open filename for input as #2