冒泡排序数组程序，选择一定数量

Question

我正在尝试从随机的一组X数字中找到一个数字。我不希望你把它放在自己身上我会喜欢建议所以我可以学习。

我的代码可以让我显示任意数量的随机数。我无法在这些数字中搜索，这就是我迷失的地方。 代码显示没有错误。 “踏入”对我来说仍然是新的。

Private Sub GenerateAndSearch(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSort.Click, btnGenerate.Click
        Static intDataArray(-1) As Integer
        Dim btnButtonClicked As Button = sender

        Select Case btnButtonClicked.Tag
            Case "Generate Array"
                Call GenerateSortedArray(intDataArray)

                Me.lstbox1.Items.Clear()
                Call DisplayData(intDataArray, Me.lstbox1, "Sorted array:")

            Case "Search Array"
                Dim intNumToFind As Integer = Val(Me.txtNumElements.Text)
                Dim intNumFoundIndex As Integer

                intNumFoundIndex = BinarySearch(intDataArray, intNumToFind)
                If intNumFoundIndex = -1 Then
                    Me.Label1.Text = "Number not found."
                Else
                    Me.Label1.Text = "Number found at index" & intNumFoundIndex
                End If
        End Select
    End Sub