在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
x=0
Do Until x=-1
a=InputBox(“请输入A的值”)
a=Val(

A．
b=InputBox(“请输入B的值”)
b=Val(

B．

C．14

D．15

女孩，7岁，因畏寒、发热8天，伴纳差、腹胀、腹痛，大便每天1～2次，略稀，当地医院用青霉素治疗热不退转来。体检：体温39.2℃，神志清，精神萎靡，表情淡漠，舌苔厚，心肺无异常，腹略胀，肝肋下2cm，脾肋下3cm，质软，经血培养证实为伤寒。关于伤寒，其典型的临床表现是（）

A.弛张热，脾肿大，玫瑰疹，间歇脉，白细胞降低

B.稽留热，脾肿大，玫瑰疹，奇脉，白细胞升高

C.持续发热，脾肿大，玫瑰疹，相对缓脉，白细胞计数减低

D.持续发热，脾肿大，瘀点，重脉，白细胞计数降低

E.不规则发热，脾肿大，瘀点、相对缓脉，白细胞计数升高