患者，女性，34岁，在活动中突然出现剧烈头痛伴随恶心和呕吐。既往没有类似的头痛发作

为找病因应首先考虑哪项检查（）

A.病毒或细菌学检查

B.脑活检

C.脑血管造影

D.头颅CT检查

E.经颅超声多普勒（TCD.检查

以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后的平均分即为最后得分)，如图所示。请填空。

Private Sub Commandl_Click()
Dim k As Integer
Dim sum As Single， max； As Single， min As Single
sum=Text1(0)
max=Text1(0)
min= _____
For k= ______ To 6
If max＜Text1(k) Then
max = Text1(k)
End If
If min＞Texl(k) Then
min = Text1(k)
End If
sum=sum+Text1(k)
Next k
Text2= (______) /5
End Sub