假定在工程文件中有一个标准模块，其中定义了如下记录类型：
Type Books
Name As String*10
TelNum As String*20
End Type
要求在执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。将以下程序补充完整。
Private Sub Command1_Click()
Dim B As Books
open "c:\person.txt"For output As#1
B.Name=InputBox(“请输入姓名”)
B.TeINum=InputBoxt“请输入电话号码“)
write#1， (13)
close#1
End Sub

通货膨胀可以按其形成原因划分为很多类型，( )所引发的通货膨胀称为需求拉上型通货膨胀。

A．因社会总需求过度增长，超过了社会总供给的增长幅度

B．因进口商品价格上升、费用增加而使物价总水平上涨

C．因工资和物价螺旋上升

D．经济结构方面的因素变动