患者男，42岁，症见左下肢皮色紫黯，抬高时见苍白，足背毳毛脱落，皮肤肌肉萎缩，趾甲变厚，趺阳脉搏动消失，患肢疼痛持续，夜间为重，舌黯红，脉沉细而涩。

该患者诊断为（）

A.脱疽寒湿证

B.脱疽血瘀证

C.痹症血瘀证

D.脱疽气血两虚证

E.痹症湿热内结证

设有如下程序：
Prirate Sub Form_Click()
Dim a As Integer,b AS Integer
a=20:b=50
p1 a,b
p2 a,b
p3 a,b
Print"a="；a,"b=";b
End Sub
Sub p1(x As Integeh By Val y As Integer)
x=x+10
y=y+20
End Sub
Sub p2(ByVal x As Integer,y As Integer)
x=x+10
　y=y+20
End Sub
Sub p3 (ByVal x As Integer,ByVal y As Integer)
　x=x+10
　y=y+20
End Sub
该程序运行后，单击窗体，则在窗体上显示的内容是：a= (11) 和b= (12) 。