精華區beta Visual_Basic 關於我們 聯絡資訊
※ 引述《shenghong (連不上ptt,哭到天明)》之銘言: : 請問各位先進 : 小弟我想在計算機的程式設計:按q或Q跳出 : 使用書本上的寫法 : 但沒有作用 : 請問該往哪方面修改? : 謝謝^^ 表單的KeyPreview屬性設為True應該就可以了... : Private Sub Form_KeyPress(KeyAscii As Integer) : ch = Chr(KeyAscii) : If ch = "q" Or ch = "Q" Then ' 檢查是否按q或Q : End ' 若是則程式結束 最好使用 Unload me 來關閉... : End If : End Sub -- 人若無星爺,跟條鹹魚有何分別? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 210.58.156.36
shenghong:可以了...謝謝...^^ 220.133.49.48 01/09
shenghong:也可以在Form_Load加一行 220.133.49.48 01/09
shenghong:KeyPreview = True 220.133.49.48 01/09