8岁男孩，玩耍时从一个1m高的土堆上摔倒，滚到一个木板堆上，起立后发现左大腿上有一破口，感到局部疼痛，到医院就诊，检查发现皮肤破口约0.3cm深达皮下，出血不多，X线未见骨折和其他异常。(以下2题共用题干)

过了一年受伤部位红肿发热，此时应考虑（ ）。

A．伤口发炎

B．内有异物

C．又受伤

D．局部血液循环不好

E．营养不良

窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Commandl的命令按钮。
运行后的窗体外观如下图所示。

设有如下的类型声明：
Type Person
name As String*8
major As String*20
End Type
当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test290.dat中。设文本框中的数据已正确地赋值给Person类型的变量P。则能够正确地把数据写入文件的程序段是( )。