C=InputBox(“请输入字符串：”))p=”””” ForrL=Len(c))Too22Stepp–22P=Mid(C,,LL––1,,2))++PPNexttLL PrinttPPPPPPP EnddSubbb 如果输入：ABCDEFGG，则结