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;
}
}