vb定義數(shù)組并賦值 VB編程,將一維數(shù)組中10個元素向右循環(huán)移n位?
VB編程,將一維數(shù)組中10個元素向右循環(huán)移n位?定義一個新數(shù)組來存儲新訂單。這是一個通用的算法,但是已經(jīng)忘記了VB的語法,希望大家也能有所幫助。dim old[10]={1,3,5,7,9,2,4,6
VB編程,將一維數(shù)組中10個元素向右循環(huán)移n位?
定義一個新數(shù)組來存儲新訂單。這是一個通用的算法,但是已經(jīng)忘記了VB的語法,希望大家也能有所幫助。
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í)行