下列程序的功能是：将数据1，2，…，8写入顺序文件Num．txt中，请补充完整。　　Private Sub Form_Click() 　　　　Dim i As Integer　　　　Open"Num．txt"For Output As #1　　　　For i=1 To 8　　　　【 】 　　　　Next i　　　　Close #1　　End Sub

如图所示实验中，小球沿斜槽往下滑时，_______能转化为__________能；当小球接触弹簧继续往右运动时，_________能转化为___________ 能；在弹簧恢复原状的过程中，___________ 能转化为__________能。