文件的一条问题?谢各位帮忙!

Question

为窗体Form2添加一个子过程sub showtext(n as long),
完成以下功能: 如果n=0,则将窗体中的txtno、txtname、txtdepartment、txtpositon
四个textbox控件中的内容为清空，否则，从文件"employee.dat"中读取第n条记录到变
量f中，然后显示该记录.

Answer 1

private function jj(byval n as long)
if n =0 then
   txtno.txt=""
   txtname.txt=""
   txtdepartment=""
   txtpositon=""
else
  open "employee.dat" for output as #1 , n , f
end if
end function
楼下的，我这对不对呀？？？