無差別に技術をついばむ鳥

Imports System

Module Module1

    Sub Main()
        Dim strs(5) As String '宣言する際には型と大きさを指定する。
        strs(0) = "hello "
        strs(1) = "インドリ。"
        strs(2) = "ドリィちゃんは"
        strs(3) = "どうした"
        strs(4) = "?"
        Console.WriteLine( _
            strs(0) & strs(1) & strs(2) & strs(3) & strs(4))
    End Sub

End Module 

Imports System

Module Module1

    Sub Main()
        Dim strs() As String = { _
            "hello ", "インドリ。", "ドリィちゃんは", "どうした", "?"}
        strs(0) = "hello "
        strs(1) = "インドリ。"
        strs(2) = "ドリィちゃんは"
        strs(3) = "どうした"
        strs(4) = "?"
        Console.WriteLine( _
            strs(0) & strs(1) & strs(2) & strs(3) & strs(4))
    End Sub

End Module