Diminuir número a cada clique do mouse

Pessoal, é simples mas não estou conseguindo

queria que a cada clique do mouse diminuisse o número 20 de 2 em 2

Partial Class _Default
Inherits System.Web.UI.Page

Public prd As New produto

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Response.Cookies("estoque").Value = 0
prd.retirar(2)
ListBox1.Items.Add(prd.estoque)
End Sub

End Class

Public Class produto

Public estoque As Integer = 20

Function retirar(ByVal quantidade As Integer) As Integer
Dim valor As Integer

valor = System.Convert.ToInt32(Request.Cookies("estoque")) <<<< Está dando erro aqui. System.Web.HttpException was unhandled by user code
estoque = valor - quantidade
Return Response.Cookies("estoque").Value = estoque

End Function
End Class