在vb中,用for 循环1 2 3 3 4 ......n (n-1)(n 1)