Trik berikut berguna sekali apabila Anda melakukan input data nama atau alamat yang lebuh baiknya setiap Awal kata di awali dengan huruf besar.
- Bukalah program Visual Basic 6.0 dan mulailah Form Baru.
- Setelah itu masukan sebuah komponen TextBox Kedalam area form baru.
- Selanjutnya klik ganda pada komponen Text1 dan ketiklah perintah di bawah ini.
1| Private Sub Text1_Change ()
2| Text = StrConv (Text1, vbProperCase )
3| SendKeys “{end}”
4| End Sub
2| Text = StrConv (Text1, vbProperCase )
3| SendKeys “{end}”
4| End Sub
Keterangan Kode :
2 Mengubah nilai yang terdapat di dalam komponen Text1 dengan nilai yang akan mengkonversi setiap awalan kata menjadi huruf besar.
3 Perintah ini akan mengaktifkan kursor pada baris paling akhir teks yang terdapat pada komponen Text1.
3 Perintah ini akan mengaktifkan kursor pada baris paling akhir teks yang terdapat pada komponen Text1.
- Untuk mencoba hasilnya, tekan tombol F5 pada keyboard Anda.
EmoticonEmoticon