Selasa, 02 Agustus 2011

Contoh Penggunaan Fungsi Split VB6

Berikut ini adalah cara memecah-mecah suatu string berdasarkan separator tertentu.dengan menggunakan fungsi split di visual basic 6, untuk mempraktekannya siapkan :
1. Buat 1 Project baru dengan 1 Form dan 1 Commandbutton.
2. Copy-kan coding berikut ke editor Form yang bertalian.

          'Anda dapat men-split string "Cats,Dogs,Horses,Birds"
          'menjadi beberapa substrings "Cats", "Dogs", "Horses" dan "Birds".
          'Coding di bawah ini menggunakan fungsi 'split' yang hanya tersedia
          'mulai Visual Basic 6.0 ke atas.

          Private Sub Command1_Click()
          Dim strAnimals As String
          Dim iCounter As Integer
          Dim arrAnimals() As String
            strAnimals = "Cats,Dogs,Horses,Birds"

            'Ganti "," di bawah dengan separator yang Anda inginkan
            arrAnimals = Split(strAnimals, ",")
            For iCounter = LBound(arrAnimals) To UBound(arrAnimals)
                MsgBox arrAnimals(iCounter)
            Next
          End Sub

Tags:
contoh program vb6, contoh fungsi di vb6, cara penggunaan fungsi vb, tutorial vb6, download tutorial vb6, vb6 tutorial download, dasar dasar vb6, belajar vb6, cara mudah belajar vb6, vb6 artikel download, vb6 blog, contoh program vb6, artikel vb6, semua tentang vb6, vb6 api, cara menggunakan module, cara menggunakan class module

Ditulis Oleh : Wahyu Aji // 06.11
Kategori:

0 komentar:

Posting Komentar