锡林郭勒草原牧民定居点附近草场退化的主要原因是（   ）

A．过度农垦

B．过度放牧

C．过度樵采

D．水资源利用不当

有如下程序：
a$="122345876"
d$=Left$(a$，1)
For i=2 To Len(a$);
z$=Mid$(a$，i，1)
If z$＞d$ Then d$=z$
Next i
Print d$
运行后，输出的结果是______。

A．1

B．7

C．4

D．8