主题：错误删除问题

      某个数据列设为用下拉列表输入，且不能输入列表外的内容，输入正常，在编辑状态下也不能输入数据和删除数据，但当点击到该列当前单元格后，按delete键却能将单元格内容整个删除，请问如何解决这个问题，实现不能删除，只能选择输入？

If Tables(e.DataTable.Name).Cols(e.DataCol.Name).AllowDirectType = false then

    If e.NewValue = "" then

        e.Cancel = true

    End If

endif

If Tables(e.DataTable.Name).Cols(e.DataCol.Name).AllowDirectType = false then

    If e.NewValue is nothing then

        e.Cancel = true

    End If

endif