用VB怎么编1,122,122333,1223334444.的数列