以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]双击表备注单元格,允许编辑时直接输入,不允许时打开窗口,怎么实现?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=128786)

--  作者:ytzn
--  发布时间:2018/12/14 21:49:00
--  [求助]双击表备注单元格,允许编辑时直接输入,不允许时打开窗口,怎么实现?
在DoubleClick:

If e.Col.name="备注" And e.cancel=true Then
   Forms("备注").open
end if

不打开窗口

--  作者:有点蓝
--  发布时间:2018/12/14 22:01:00
--  
什么条件才算是不允许编辑?
--  作者:ytzn
--  发布时间:2018/12/14 23:01:00
--  

在销售明细 startedit 中:

If
 e.Col.Name = "备注" hen
   if tables("订单").current("付款状态")="已付清
" then
       e.Cancel = True \'取消编辑, 销售明细中的备注不能输入内容,只可双击打开备注窗口,在窗口文本框中输入完后保存累加到销售明细的备注中
   end if
End If


也就是说当该订单已结账时,销售明细的备注只能累加新内容,不能修改
[此贴子已经被作者于2018/12/14 23:10:18编辑过]

--  作者:有点蓝
--  发布时间:2018/12/14 23:09:00
--  
DoubleClick

If e.Col.name="备注" AndAlso e.Row("付款状态")="已付清" Then
    e.Cancel = True
    Forms("备注").open
End If

--  作者:ytzn
--  发布时间:2018/12/14 23:12:00
--  
多谢蓝老师