有如下VB程序段：

s="dkMoNpA"

For i=1 to len(s)

    ch=mid(s, i, 1)

    if ch>="A" and  ch<="Z"  then  ch=chr(asc(ch)  +32)

    if ch>="a" and ch<="z" then ch=chr(asc(ch) -32)

    st=st+ch

Next i

Text1.text=st

经过程序段处理后，文本框中最终显示的内容是（      ）

A、DKMoNpA

B、DkMoNpA

C、DKmOnPa

D、DKMONPA