vb6 String 去掉0之后