[RESOLVED] Help with ShowScrollBar API

[msayed2004]

I can give a control scrollbars by this API , but how can I give them code , I mean how can I make them scroll something???????

Private Declare Function ShowScrollBar Lib "user32" (ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long
Private Const SB_HORZ = 0
Private Const SB_VERT = 1
Private Const SB_BOTH = 3
Private Sub Form_Load()
    ShowScrollBar Text1.hwnd, SB_BOTH, True
End Sub