Как получить каждое значение в массиве и показать его в списке

Question

Привет, я новичок в VB и у меня проблемы с использованием массива. Мой код такой. Это класс FindFactorsObject.vb

Public Sub FindFactors()
    count = 0
    temp = Convert.ToInt32(Math.Sqrt(_x))
    For i As Integer = 1 To temp
        If _x Mod i = 0 Then
            ReDim array(count)
            array(count) = i
            count += 1
        End If
    Next

Поэтому я создал массив и сохранил результаты. Теперь я хочу отобразить каждое значение в моем массиве в Form.vb и, если это возможно, может кто-нибудь научить меня, как сделать задержку для каждого из отображаемых значений. Спасибо большое

Answer 1

Всегда объявляйте ваши переменные, если возможно, их точным типам, которые, как вы думаете, будут заботиться Когда вы говорите: "Теперь я хочу отобразить каждое значение в моем массиве в Form.vb", я понял буквально: в Форме так, мы напечатаем их в вашей форме.

Public Sub FindFactors(_x As Integer)
    Dim temp As Integer = Convert.ToInt32(Math.Sqrt(_x))
    Dim l As New List(Of Integer)
    For i As Integer = 1 To temp
        If _x Mod i = 0 Then
            l.add(i)
        End If
    Next
    Dim pf As New PointF(20, 20)
    For Each i As Integer In l
        creategraphics.drawstring(i.ToString, New font(font.fontFamily, 24), brushes.cadetblue, pf)
        pf = New PointF(pf.X, pf.Y + 30)
    Next
End Sub