https://remp3indir.net/simple-visual-basic-tutorials-counting-function/