以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  自定义录入一, 选择客户ID后,客户名称还填充  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=86595)

--  作者:misamisali
--  发布时间:2016/6/21 11:36:00
--  自定义录入一, 选择客户ID后,客户名称还填充
如图表1:我设计好的客户选择表。
表2:根据编程选择了“最终客户”列“F2”,根据教程,应该会在选择了“最终客户”后,客户名称列也会填充“大哥大”,

图片点击可在新窗口打开查看此主题相关图片如下:表2.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:表3.jpg
图片点击可在新窗口打开查看
表3:客户名称,还是空白,哪里出错了?
图片点击可在新窗口打开查看此主题相关图片如下:表1.jpg
图片点击可在新窗口打开查看

--  作者:大红袍
--  发布时间:2016/6/21 11:42:00
--  
贴出你doubleclick事件的代码
--  作者:misamisali
--  发布时间:2016/6/21 11:44:00
--  
Dim tbl As Table = Tables("客户选择_Table1")
If tbl.Current IsNot Nothing Then
Tables("销售进度表").Current ("最终客户") = tbl. Current ("最终客户")
End If 
e. Form.Close()

--  作者:大红袍
--  发布时间:2016/6/21 11:55:00
--  

CellButtonClick事件

 

vars("表") = e.Table

e.Cancel = true

Forms("客户选择").Show

 

DoubleClick事件

 

vars("表").Current ("最终客户") = e.Row("最终客户")
vars("表").Current ("客户名称") = e.Row("客户名称")
e. Form.Close()

--  作者:misamisali
--  发布时间:2016/6/21 13:45:00
--  你写代码出错了
按你写的代码,确认就错误了。
[此贴子已经被作者于2016/6/21 13:48:00编辑过]

--  作者:大红袍
--  发布时间:2016/6/21 14:15:00
--  
 不可能,上传实例。
--  作者:misamisali
--  发布时间:2016/6/21 15:20:00
--  
修好了,是我自己设置的问题,看成是一个代码了。