Pada Visual Basic 6 ada sebuah komponen yang sering dipakai, yaitu Text Box, tapi ActiveX ini punya sedikit kelemahan yaitu misalnya untuk berpindah dari Text1 ke Text2 harus menggunakan Tab, kalaupun pakai enter harus memasukan code
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then Text2.SetFocus
End Sub
Memang code tersebut hanya satu baris, tapi kalau text box nya banyak ?Hehehe tentunya cukup merepotkan juga. Oleh karena itu saya mencoba membuat ActiveX yang saya beri nama Perfect Text, yaitu penyempurnaan dari Text Box.
Penyempurnaannya terletak dalam PropertiesYaitu
- Enkripsi
- SetAngka
- SetAwalKapital
- SetEnkripsi
- SetLangsung
- SetTerbilang
