html5数组循环右移,下面的程序代码实现将一个一维数组中元素向右循环移动 移位次数由文本框Text输入。例如数组各元素...

下面的程序代码实现将一个一维数组中元素向右循环移动,移位次数由文本框Text输入。例如数组各元素的值依次为0,1,2,3,4,5,6,7,8,9,10;移动三次后,各元素的值依次为8,9,10,0,1,2,3,4,5,6,7。

Private Sub Moveright(x()As Integer)

Dim i As Integer

Dim j As Integer

Dim k As Integer

i=UBound(x)

j=x(i)

For k=i To ______ Step-1

_______

Next k

x(LBound(x))=j

End Sub

Private Sub Command1_Click()

Dim a(10)As Integer

Dim i As Integer

Dim j As Integer

Dim k As Integer

For i=0 To 10

a(i)=i

Next i

j=Val(Text1.Text)

k=0

Do

k=k+1

Call MoveRight(a)

Loop Until k=j

For i=0 To 10

Print a(i);

Next i

End Sub

请帮忙给出正确答案和分析,谢谢!

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值