vb定義數(shù)組并賦值 VB編程，將一維數(shù)組中10個(gè)元素向右循環(huán)移n位？
VB編程，將一維數(shù)組中10個(gè)元素向右循環(huán)移n位？定義一個(gè)新數(shù)組來(lái)存儲(chǔ)新訂單。這是一個(gè)通用的算法，但是已經(jīng)忘記了VB的語(yǔ)法，希望大家也能有所幫助。dim old[10]={1,3,5,7,9,2,4,6
VB編程，將一維數(shù)組中10個(gè)元素向右循環(huán)移n位？
定義一個(gè)新數(shù)組來(lái)存儲(chǔ)新訂單。這是一個(gè)通用的算法，但是已經(jīng)忘記了VB的語(yǔ)法，希望大家也能有所幫助。
dim old[10]={1,3,5,7,9,2,4,6,8,10}
dim new[10
]dim n，i，newi
n=3
i=0
while i<10
newi=i3
如果newi>=10那么
newi=newi1-10
end if
new[newi]=old[i
]i
while執(zhí)行