下列程序的运行结果是 ______。
Private Sub Command1_ Click ()
a =1: b=1
for i = 1 To 3
a= a+ b: b=b+ a
Next i
Print a, b
End Sub

A．Private Sub Command1_ Click()
Dim x As Books
Open "C：\Person. txt" for Output As #1
x. Name=InputBox(“输入姓名”)
x. TelNum=InPutBox(“输入电话号码”)
Write #1，x.Name，x.TelNum
Close #1
End Sub
B．Private Sub Command1_ Click()
Dim x As Books
Open "c：\Person. txt" for Input As #1
x.Name=InputBox(“输入姓名”)
x. TelNum=InputBox(“输入电话号码”)
Print #1，x. Name，x. TelNum
Close #1
End Sub
C．Private Sub Command1_ Click()
Dim x As Books
Open "c：\Person. txt" for Output As #1
x. Name=InputBox(“输入姓名”)
x. TelNum= InputBox(“输入电话号码”)
Write #1，x
Close #1
End Sub
D．Private Sub Command1_ Click()
Dim x As Books
Open "c：\Person. txt" for Input As #1
x. Name= InputBox(“输入姓名”)
x.TelNum=InputBox(“输入电话号码”)
Print #1，Name，TeINum
Close #1
End Sub

A．Text
B．Value
C．Max
D．Min