Создание Row из класса

[vIRisium :)]

Народ что за дела!
Вобщем такая прабла. Из класса я вызываю функцыю которая пренадлежит модулю главной формы, по идее она создаёт Row(сторку) но почемуто этого не происходит

Код: Выделить всё


Sub AddRow(ByVal tmpIP As String, ByVal tmpName As String, ByVal tmpInfo As String)

        Dim index As Integer

        index = UserList.Rows.Count

        UserList.Rows.Add()

        UserList.Item(0, index).Value = tmpIP

        UserList.Item(1, index).Value = tmpName

        UserList.Item(2, index).Value = tmpInfo

    End Sub


Вызываю

Код: Выделить всё


  AddRow("127.0.0.1", "vIRisium", "Подключение...")


Зарание ксенька.

[iGrok]

Во-первых, что такое UserList?

Во-вторых, если ты вызываешь эту ф-цию из класса, то наверное надо добавить что-то типа frmMain.Addrow(...). ?

В-третьих, у этого контрола индексация строк начинается точно с нуля а не с единицы?

[vIRisium :)]

UserList - DataGridView в нем три столбца которым приравнивается значение. Я из класса вызываю эту процедуру и всё, всмысле и всё ничего не происходит... Строка даже не добавляется!!!

[1Steps]

Код: Выделить всё

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim c As New Class1
        c.adRow()
    End Sub

    Public Sub AddRow(ByVal tmpIP As String, ByVal tmpName As String, ByVal tmpInfo As String)
        Dim index As Integer
        index = UserList.Rows.Count
        UserList.Rows.Add()
        UserList.Item(0, index).Value = tmpIP
        UserList.Item(1, index).Value = tmpName
        UserList.Item(2, index).Value = tmpInfo
        'Или Так? Только Убери Всё Предыдущее
        UserList.Rows.Add(tmpIP, tmpName, tmpInfo)
    End Sub
End Class

и

Код: Выделить всё

Public Class Class1
    Sub New()

    End Sub

    Public Sub adRow()
        Form1.AddRow("127.0.0.1", "vIRisium", "Подключение...")
    End Sub
End Class

Всё Добавляет.