Private Sub Form_click() Dim a As Integer, b As Integer, c A

Private Sub Form_click() Dim a As Integer, b As Integer, c As Integer, k As Integer
．Private Sub Form_click()
Dim a As Integer, b As Integer, c As Integer, k As Integer
Open "c:file1.dat" For Output As #1
a=3 : b=5
Print #1,"NO." ; 1, a
Print #1,"NO." ; 2, b
For k=3 To 5
c=b-a
Print #1,"NO."; k, c
b =a
a=c
Next k
Close #1
End Sub 写出文件file1.dat的最终结果______【2】_____。