Mengatasi error “text property is read only” di Visual Basic 6

Mungkin anda pernah mengalami hal ini. Saat anda hendak mengisi combo dengan sebuah string dengan cara combo1.text = “xxx”, maka akan muncul error “text property is read only”. Hal ini sebabkan karena combo tersebut pada properties stylenya bernilai 2 atau dropdownlist. Hal ini dapat diatasi dengan mengganti xxx tersebut dengan string yang sama persis dengan isi yang ada di combo tersebut.

Atau bisa juga menggunakan cara lain, yaitu dengan menggunakan properti listIndex. Di bawah ini adalah contoh cara mengisi combo tersebut dengan menggunakan listIndex.

Dim i,angka as integer
For i = 0 To combo1.ListCount - 1
If Trim(combo1.List(i)) = Trim(text1.text) Then
angka = i
End If
Next
combo1.ListIndex = angka

Cara pertama memang lebih mudah, namun menurut pengalaman saya, kadangkala isi dari combo tersebut string yang ada terdapat pula spasi yang tidak terlihat. Butuh waktu hampir setengah jam buat saya bisa menyelesaikan masalah ini. Padahal masalahnya hanyalah spasi tersebut. Oleh karena itu dicara kedua saya melakukan trim agar spasi tersebut dihilangkan.

Semoga artikel ini membantu.