[RESOLVED] trouble with vscrollbar

[litlewiki]

i added a vscrollbar control and coded the following

Private Sub vs1_Change()
SaveSetting App.EXEName, "Options", "timeout", Val(txttimeout.Text)
txttimeout.Text = vs1.Value
End Sub

but when i click the up button ,the value reduces and when i click the down it increases.but i think it should be the other way around ??

why is that so?