VisiKita.Net

Saat membuat aplikasi kita sering menggunakan objek ComboBox dan ListBox untuk menampilkan pilihan, pada saat proses input hal ini bukanlah merupakan hal yang sulit untuk dilakukan sebab proses pemilihan data dilakukan secara manual oleh user. Namun ketika kita akan menampilkan data dari database tidak sedikit pemula mengalami kesulitan dalam menampilkan data pada objek ComboBox atau ListBox.

Kebanyakan dari para pemula tersebut akan menggunakan looping untuk mencari data yang akan ditampilkan pada objek ComboBox atau ListBox, hal ini tentu saja akan mempengaruhi performa aplikasi sehingga akan terasa lambat, terutama jika data pilihan yang ada berjumlah cukup banyak.

Berikut potongan kode yang biasa dipakai oleh mereka yang baru belajar Visual Basic dalam mencari data di ComboBox:

Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
    Dim i As Integer
   
    For i = 0 To Combo1.ListCount - 1
        If UCase(Left(Combo1.List(i), Len(Text1.Text))) = _
            UCase(Text1.Text) Then
            Combo1.ListIndex = i
            Exit For
        End If
        DoEvents
    Next
End Sub

(more…)

Setelah bahasan sebelumnya tentang memanfaatkan registry untuk menyimpan setting printer, sekarang saya mencoba untuk membuat contoh program yang akan menyimpan dan membaca data dari file konfigurasi (.INI).

Pada contoh ini saya menggunakan modul class dengan harapan bagi yang belum pernah memakai modul class dapat mengerti tentang cara memanfaatkan modul jenis ini.

Buat sebuah class dengan menglik menu Project –> Add Class Module, pada property Name isi dengan “clsSetting”.

Ketikan kode berikut pada class tersebut: (more…)