![](https://cos-cdn.shuashuati.com/pipixue-web/2020-1231-2005-12/ti_inject-812ce.png)
整理数据。 下面程序的功能是从键盘上输入10个整数。如果输入的数是负数,存放在数组s的左端;如果是非负数,存放在数组s的右端,如图所示。最后,在标签上输出全部数组元素。 例如依次输入了:9,11,-2,3,-1,-5,2,23,-4,10;则数组存放如下: -2 -1 -5 -4 10 23 2 3 11 9 程序的思想是:分别设置数组的左端和右端指针;判断输入整数的正负号,决定存放于数组s的左端或右端,调整相应指针位置,将该数存放于数组。 Private SubButton3_Click(...) Handles Button3.Click Dim s%(9), pLeft%, pRight%, i%, x% pLeft = -1 ' 设置数组的左端指针初值 pRight =10 ' 设置数组的右端指针初值 For i = 0 To 9 x = Val(InputBox("inputdata:")) If ______(1)______ Then pLeft = ______(2)______ s(pLeft) = x Else pRight = ______(3)______ s(pRight) = x End If Next i Label1.Text = "" For i = ______(4)______ Label1.Text &= s(i) &" " Next i End Sub