患者胁肋刺痛，痛有定处，入夜尤甚，胁肋下有积块，舌质紫暗，脉沉涩。

（假设信息）若病人失治误治，腹胀大，按之坚满，面色黯黑，饮水不能下，大便色黑，舌紫红，脉细涩。治疗应增加的治法是（）

A.温补脾肾

B.补肝养肾

C.化气行水

D.清利湿热

E.攻下逐水

下面的程序随机产生10个小于100的整数，并找出其最大值、最小值和平均值，请将程序补充完整。(此程序是VB语言编写)
Private Sub Form_Click( )
Dim a(1 To 10)As Integer
Dim m_max As Integer，m_min As Integer
Dim s As Single
Randomize
For i=1 To 10
a(i)=______
Print a(i)
Next i
m_max=0：m_min=100
For i=1 To 10
If a(i)＞m_max Then
If a(i)＜m min Then m_min=a(i)
s=______
______
Print"最大值是："；m_max
Print"最小值是："；m_min
Print"平均值是："；______
End Sub