患者女，46岁，因"颜面皮疹、周身水肿3个月"来诊。孕3次，均在孕12周左右出现自然流产，无明显口干、眼干，无口腔溃疡及关节肿痛。入院后查体：颜面部可见充血性皮疹，周身水肿。检查示尿蛋白（+++），血小板4.6×10¹²/L，ANA阳性，抗SSA阳性，抗U1-RNP抗体阳性。

除上述诊断外，该患者还应考虑合并（）

A.血小板减少性紫癜

B.干燥综合征

C.类风湿关节炎

D.系统性硬化病

E.抗磷脂综合征

F.遗传性疾病

假定在窗体(名称为Form1)的代码窗口中定义如下记录类型：
Private Type animal
animalName As String*20
aColor As String*10
End Type
在窗体上面一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim rec As animal
Open "c:\vbTest. dat" For Random As #1 Len=Len(rec)
rec. animalName="Cat"
rec. aColor="White"
Put #1, , rec
End Sub
则以下叙述中正确的是______。

A) 记录类型animal不能在Form1中定义，必须在标准模块中定义
B) 如果文件"c:\vbTest. dat"不存在，则Open命令执行失败
C) 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D) 语句“Put #1, , rec”将animal类型的两个数据元素写到文件中