鉴别急腹症，采集现病史时应将腹痛作为重点，包括（）。

A.腹痛的诱因

B.腹痛的部位

C.腹痛发生的缓急

D.腹痛的性质

E.腹痛的程度

在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，如图5所示，然后编写如下程序：

Function Fun(x As Integer, ByVal y As Integer) As Integer
x=x+y
If x＜0 Then
Fun=x
Else
Fun=y
End If
End Function
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a=-10:b=5
Text1.Text=Fun(a,b)
Text2.Text=Fun(a,h)
End Sub
程序运行后，单击命令按钮，Text1和Text2文本框显示的内容分别是 (11) 和 (12) 。