For i = 1 To 5 c(i) = Int(Rnd * 10) Picture1.Print Tab((i - 1) * 5); c(i); '分号是紧接着，不换行,tab(n)是在第几列开始 Next i
