VBNet - Форум - Есть ли разница в объявлении массива.... пример...

Вопрос: Есть ли разница в объявлении массива.... пример... Добавлено: 13.12.09 02:01

Автор вопроса: DimDoc

Есть ли разница в объявлении массива:

Dim m() as string

и

Dim m as string()

попробовал оба варианта и не увидел разницы...
тестировал так:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim test1() As String
        Dim t1 As String = ""
        Dim test2 As String()
        Dim t2 As String = ""

        ReDim test1(4)
        test1(0) = "д"
        test1(1) = "г"
        test1(2) = "в"
        test1(3) = "б"
        test1(4) = "а"

        For i = 0 To UBound(test1)
            t1 &= " " & test1(i)
        Next

        MessageBox.Show("test1: " & t1, "test1")
        Array.Sort(test1)
        t1 = ""
        For i = 0 To UBound(test1)
            t1 &= " " & test1(i)
        Next
        MessageBox.Show("test1: " & t1, "test1")

        ReDim test2(4)
        test2(0) = "д"
        test2(1) = "г"
        test2(2) = "в"
        test2(3) = "б"
        test2(4) = "а"

        For i = 0 To UBound(test2)
            t2 &= " " & test2(i)
        Next

        MessageBox.Show("test2: " & t2, "test2")
        't2 = ""
        Dim sortmystr As String = "" 'чтобы не уничтожать строку t2
        Array.Sort(test2)
        For i = 0 To UBound(test2)
            sortmystr &= " " & test2(i)
        Next
        MessageBox.Show("test2: " & sortmystr, "test2")
    End Sub
End Class

Ответить

Ответы Всего ответов: 3

Номер ответа: 1 Автор ответа: Skywalker ICQ: 300-70-6пятьЪ Вопросов: 62 Ответов: 545	Web-сайт: iSkywalker.ru Профиль \| \| #1	Добавлено: 13.12.09 03:20
	разницы нет, единственное Dim q(5) As SomeClass можно сразу указать размер, а вот так Dim q As SomeClass(5) делать низя Ответить

Номер ответа: 2 Автор ответа: DimDoc Вопросов: 21 Ответов: 104	Профиль \| \| #2	Добавлено: 13.12.09 03:30
	понял... Спасибо! Ответить

Номер ответа: 3 Автор ответа: fluke ICQ: 318170731 Вопросов: 15 Ответов: 96	Профиль \| \| #3	Добавлено: 14.12.09 10:14
	ну почему же низя, можно Dim q As SomeClass() = New SomeClass(5){} Ответить

Страница: 1 |