我的窗体上有三个sqltable类型表，由于编辑行时不能自动换行，于是改用一个共用窗体加文本框来输入，下面的方法在单机上测试没有问题，1、请问多用户时此法可用吗？2、正确的方法请指导！
第一 步：
在每窗体表的DoubleClick事件中加如下代码
vars("str") = e.Row(e.Col.Name)
vars("tb")= e.Table.Name
vars("colnane") = e.Col.Name
Forms("auto输入").Open
第二步：在输入窗体（forms（“aut输入”））的AfterLoad 事件中加代码
Dim txtauto As WinForm.TextBox = e.Form.Controls("txtauto输入")
txtauto.Text = ""
txtauto.Text = vars("str")
第三步 forms("auto输入”)的BeforeClose 事件代码
Tables(vars("tb")).Current(vars("colnane")) = vars("str")
加好友 
发短信
Post By：2020/12/27 15:38:00 [显示全部帖子]
