2011/07/06(Wed) 12:39:41 編集(投稿者)
■No60506 (裕猫 さん) に返信
VB.NETですがこれでいけました。ウィンドウメッセージのがやはり先に判定されているようです。
Private Sub TextBox1_Validating(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles TextBox1.Validating
If TextBox1.Text = "1" Then
e.Cancel = True
End If
End Sub
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
If m.Msg = &H112 Then ' WM_SYSCOMMAND = &H112
If m.WParam.ToInt32 = &HF060 Then 'SC_CLOSE = &HF060
TextBox1.Text = ""
End If
End If
MyBase.WndProc(m)
End Sub