A.Open"text.dat"For Write As #1
B.Open"text.dat"For Binary As #1
C.Open"text.dat"For Input As #1
D.Open"text.dat"For Random As #1