Anni e anni fa ho fatto qualcosa del genere (te lo scrivo in C# perchè non uso più VB ma se vuoi lo traduco). Non prenderlo come un metodo ortodosso perchè tecnicamente si fa in un altro modo ma io sono troppo fantasioso....

codice:
public partial class Form1 : Form
    {
        public int a;
        public char k;
        public Form1()
        {
            InitializeComponent();
        }

        private void timer1_Tick(object sender, EventArgs e)
        {
            a++;
            label1.Text=a.ToString();
            if (k == (char)65)
                Application.Exit();


        }

        private void textBox1_KeyPress(object sender, KeyPressEventArgs e)
        {
            k = e.KeyChar;
             
        }

 
    }