Va bene nella Form_Click, ma manca il codice che aumenta la variabile .... Dov'e' finito?

P.S. Per la label, e' meglio scrivere

totale.caption = CStr(contaclick)