大家看看这个要如何弄

大家看看这个要怎么弄？
比如我有
CM9_480x800_001.jpg
CM9_480x800_002.jpg
CM9_480x800_003.jpg
CM9_480x800_004.jpg
CM9_480x800_005.jpg
CM9_480x800_006.jpg
CM9_480x800_007.jpg
CM9_480x800_008.jpg
CM9_480x800_009.jpg
CM9_480x800_010.jpg
CM9_480x800_011.jpg
..........

要怎么把它那加的一位去掉啊？
就像CM9_480x800_009.jpg到CM9_480x800_010.jpg那个009到010怎么搞？

[解决办法]

VB code

Function PadLeft(ByVal source As String, ByVal padchar As String, ByVal length As Long)    Dim i As Long    Dim s As String    For i = 1 To length - Len(source)        s = s & padchar    Next    PadLeft = s & sourceEnd Function