Ciao. Guarda che comunque VB2010 è VB.NET

Per il tuo problema:

codice:
If e.KeyCode = Keys.F2 Then
    If MessageBox.Show("Testo", "Titolo", MessageBoxButtons.YesNo, MessageBoxIcon.Asterisk) = Windows.Forms.DialogResult.Yes Then
       Form2.Show()
    End If
End If