INKEY$を使えばどうでしょうか。