我。FontSize？=?20
為了什麽？我？=?Asc("E ")？去哪？Asc("A ")？壹步？-1
我。CurrentX？=?(我。ScaleWidth？-?我。文本寬度)？/?2?-?1000
打印？空格(Asc("E ")？-?I)；
為了什麽？j？=?(我？-?Asc("A "))？*?2?+?1?去哪？1?壹步？-1
打印？人權委員會(壹)；
然後
打印
結束？Sub，請采納