有事請問(編號:6914)

Private Sub Form_Activate()
Print "按Y鍵結束程式:";
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Inkey = UCase(Chr(KeyAscii)
Print Inkey
If Inkey = "Y" Then
End
End If
我跑不出來,不知道可不可以教教我
Print "按Y鍵結束程式:";
End Sub