我目前正在維護一個VB6應用程序,但對VB6知之甚少。 我遇到了一些讓我困惑的代碼。Escape成爲Ctrl-Z - 但爲什麼?
Private Sub Form_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(UCase(Chr(KeyAscii)))
If KeyAscii = 27 And TypeOf Me.ActiveControl Is TextBox Then
KeyAscii = 0
SendKeys "^Z"
End If
End Sub
這是我知道的:當按下退出按鈕的代碼時調用的按Ctrl +ž一個按鍵。 以下是我不知道的:爲什麼?我在點擊轉義後進行調試,除了if語句的內容被運行外,我沒有做太多的事情,除了短暫的光標顯示之外。
有誰知道這個的重要性嗎?即發送一個Ctrl + Z按鍵組合。
在當前文本框上做非常笨拙的方法。此外,它會重做第二個Esc被按下。如果在撤消隊列中有任何東西,最好使用帶有'EM_CANUNDO'和'EM_UNDO'的API。 – wqw 2012-03-09 14:34:26