VB6 pur avendolo usato per anni ora non l'ho piú installato e ti assicuro che non ne sento minimamente la mancanza da quando uso VB.Net
Nel tuo caso devi associare all'evento click del commandbutton una combinazione di tasti come fossero stati premuti da tastiera, la funzione da usare é SendKeys, qui qualche esempio di utilizzo
SendKeys "%{F4}",true oppure SendKeys "%{F4}"
per la combinazione Alt+F4
SendKeys "^{F4}",true oppure SendKeys "^{F4}"
per la combinazione CTRL+F4
SendKeys "+{F4}",true oppure SendKeys "+{F4}"
per la combinazione Shift+F4
Non ho modo di verificare se
SendKeys "%{1}"
simula ALT+1, ma questa é la strada piú semplice che puoi seguire
Considera che la funzione Sendkeys non é piú supportata dai sistemi operativi recenti, es. Windows Vista, quindi potrebbe anche non funzionare, vedi ad es:
http://social.msdn.microsoft.com/forums/en-US/windowsgeneraldevelopmentissues/thread/f9118e01-e2ed-491a-99d7-003efb3310a9/