私は現在VB6アプリケーションを管理していますが、VB6についての知識はほとんどありません。 私は困惑しているコードを見つけました。エスケープは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 +Zのキー操作を呼び出しています。 私は知らないことがあります:なぜですか?私はエスケープをクリックしてからデバッグし、if文の中身は別にして、カーソルのちらつき表示以外には私が見逃すことのないようにしました。
誰でもこのことの重要性を知っていますか?すなわち、を送信する。 + Zキーの組み合わせ。
現在のテキストボックスで取り消しを行う方法が非常に不器用です。また、Escを押すと再度実行されます。アンドゥ・キューに何かがある場合は、EM_CANUNDOでAPIを使用してからEM_UNDOを使用するのが最適です。 – wqw