Why don't you just set the value of the label to a variable, and update that variable from wherever you need?
For instance:
Private _myIndex As Integer = 0
Sub Increment()
_myIndex += 1
UpdateLabel()
End Sub
Sub Decrement()
_myIndex -= 1
UpdateLabel()
End Sub
Sub UpdateLabel()
Label1.Text = CStr(_myIndex)
End Sub