下列程序的功能是；将数据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

A．print #1,i

B．input #1,i

C．print #1

D．input #1

《中华人民共和国节约能源法》赋予交通运输部门对营运车辆实施燃料消耗量检测监督管理的职责。