光标保留 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

设置了e.Cancel=true，单元格不能离开焦点，还是在编辑状态，无法设置其内容的。

试试DataColChanging事件

If e.DataCol.Name = "第四列" Then

If e.NewValue > "" Then '如果已经输入内容

Dim v As Double = Val(e.NewValue ) '将输入的内容转换为数值

If v > 0.15 Then '如果输入的值大于0.15

e.NewValue = Nothing

Messagebox.Show("错误!")

'e.Cancel = True '则禁止退出编辑模式

CurrentTable.Select(CurrentTable.RowSel,CurrentTable.ColSel-1)

End If

主题：光标保留