dim a as string*20
或者用Format
或者循环补位另外,你的变量是什么类型的?