VB编程：使用inputbox 函数输入20个整数，保存到一维数组A中，将数组A中各
VB编程：使用inputbox函数输入20个整数，保存到一维数组A中，将数组A中各元素的值移到后一元素中，而最后一元素的值移到第一个元素中，然后在窗体上按行5个的格式输出...
VB编程：使用inputbox 函数输入20个整数，保存到一维数组A中，将数组A中各元素的值移到后一元素中，而最后一元素的值移到第一个元素中，然后在窗体上按行5个的格式输出。
展开
展开全部
Private Sub Command1_Click()
Dim a(20) As Integer
For i = 1 To 20
a(i) = InputBox("第" & i & "个数：")
Next i
x = a(20)
For i = 20 To 2 Step -1
a(i) = a(i - 1)
Next i
a(1) = x
For i = 1 To 20
Print a(i),
If i Mod 5 = 0 Then Print
Next i
End Sub
Dim a(20) As Integer
For i = 1 To 20
a(i) = InputBox("第" & i & "个数：")
Next i
x = a(20)
For i = 20 To 2 Step -1
a(i) = a(i - 1)
Next i
a(1) = x
For i = 1 To 20
Print a(i),
If i Mod 5 = 0 Then Print
Next i
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
