文字列の一部を取得するには？ (ID:121371)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 >lnglen = Len(strTemp(0)) >'数字を足す >lngTemp = CLng(strTemp(0)) + 1 >'0を数 >Do Until lnglen = Len(zero) > zero = zero & "0" >Loop >'0追加 >strTemp(0) = Right(zero & CStr(lngTemp), lnglen) ここは数字４桁と決まっているなら strTemp(0)=Format(Clng(strTemp(0)+1&,"0000") とした方が簡単かもしれませんね