Thursday, June 14, 2012

Mengaktifkan Horizontal ScrollBar Pada RichTextBox

Mengenai cara mengaktifkan Horizontal ScrollBar yang terdapat pada objek RichtTextBox VB6 Code - Pada saat kita mengisi text RichTextBox, maka secara otomatis RichTextBox tersebut akan melakukan aksi WordWrap, sekalipun kita telah menyeting properties RichtTextBox tersebut menjadi bernilai 3 - rtfBoth (Horizontal dan ScrollBar). Hal tersebut dikarenakan RightMargin yang terdapat pada RichtTextBox tersebut bernilai 0. Nah, untuk mengaktifkan Horizontal RichtTextBox tersebut Anda cukup meng-assign sebuah nilai properties RightMargin ke angka yang sangat besar, berikut contoh kodenya:
Private Sub Command1_Click()
RichTextBox1.RightMargin = 500000 'aktifkan horizontal scrollbar
End Sub
Demikian mengenai cara mengaktifkan horizontal scrollbar yang terdapat pada objek RichTextBox dalam bahasa pemrogaman VB6, semoga bermanfaat.