以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  textchanged事件问题1  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=151244)

--  作者：狐表（小白） --  发布时间：2020/6/18 18:37:00 --  textchanged事件问题1 以下textchanged代码，在用鼠标全选控件内容用backspace键删除时，控件内的值又会自动恢复，必须用backspace一个个的删除才可以，删除速度快了也不行，什么问题？ Dim txt As String = Forms("销售订单").Controls("型号").Text Dim r As row = Tables("销售订单明细_Table1").current If txt = "" Then    r("单价")= nothing    r("计算公式")= nothing    r("长")= nothing End If

--  作者：有点蓝 --  发布时间：2020/6/18 20:19:00 --   看不出什么问题，请上传实例测试