以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  ValidateEdit事件输入错误的内容，如何清空错误的内容  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97689)
--  作者：蓝蚂蚁
--  发布时间：2017/3/16 21:24:00
--  ValidateEdit事件输入错误的内容，如何清空错误的内容
If e.Col.Name = "性别" Then
    If e.Text="1" Or e.Text="2" Then
        If e.Text = "1" Then
           e.Text = "男"
        Else  
           e.Text = "女"
         End If
    Else
        MessageBox.Show("输入有误,请重新输入!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
               e.text=""【如果输入错误的内容，则清空单元格的内容，但这里的代码清除不了，请老师帮解答，谢谢】
            e.Cancel = True 
    End If
End If
--  作者：有点色
--  发布时间：2017/3/17 1:14:00
--  

加上代码

 

Sendkeys.Send("{Esc}")
e.cancel = true