VB上机题:输入一个正整数n,再定义一个有n个元素的一维数组

问题描述:

VB上机题:输入一个正整数n,再定义一个有n个元素的一维数组
实在不会做,有赏币的~输入一个正整数n,再定义一个有n个元素的一维数组,生成n个-50~50范围内的随机整数,保存到数组中,然后将数组两端的元素对调,即将第一个元素与第n个元素对调,将第二个元素与第n-1个元素对调.,分别输出对调后前后的数组元素.

Private Sub Command1_Click()Dim a() As Integern = Val(InputBox("N="))ReDim a(n)Print "Before:"For i = 1 To n  a(i) = Int(101 * Rnd) - 50  Print a(i);  If i Mod 10 = 0 Th...