March 30, 2009

Visual Basic Join Function

Ini merupakan simple tips untuk membuat Delimit String dengan menggunakan VB Join Function.
Pada artikel ini bagaimana kita membuat function untuk menggabung (join) beberapa kata pada array. Dan pada hasil/output yang di keluarkan akan memberi tanda pemisah antara kata-kata tersebut. Untuk lebih jelas nya ketik sintak dibawah.

Private Function GetDelimitedString(ByVal strings As String(), ByVal delimiter As String) As String
        Return Join(strings, delimiter)
End Function

Sub Main()
        Try
             Dim strings As String() = {"Rina", "Budi", "Agus", "Ahmad"}
            Console.WriteLine(GetDelimitedString(strings, "-"))
        Catch ex As Exception
            Console.WriteLine("error: " & ex.Message)
        End Try
End Sub

Maka hasil nya : Rina-Budi-Agus-Ahmad

Semoga bermanfaat..
Wassalam

1 comment:

dizi said...

array.. hampir sama dengan di vb6 ya