How can I set the ScrollBars property of a textboy during runtime?
(I hate VB in cause of such things ;))
Printable View
How can I set the ScrollBars property of a textboy during runtime?
(I hate VB in cause of such things ;))
It's ReadOnly, so I don't think you can.
Im asking because there must be a way. Probably with subclassing the textbox or some API stuff...
Hi Fox, Hope this can help you.
Code:Option Explicit
Private Declare Function ShowScrollBar Lib "user32" (ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long
Private Const SB_BOTH = 3
Private Const SB_HORZ = 0
Private Const SB_VERT = 1
Private Sub Command1_Click()
ShowScrollBar Text1.hwnd, SB_BOTH, 1
End Sub
Exactly. Thank you :)