https://kamarprogrammer.blogspot.com/2017/02/perulangan-do-while-loop-pada-vb-net.html