Jasper Yu
says to
YSITD
Label1.Text = Int(Label1.Text) + 1