以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  获取下拉窗口所处的列名  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=175688)

--  作者:采菊东篱下
--  发布时间:2022/3/15 14:58:00
--  获取下拉窗口所处的列名

图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20220315144516.jpg
图片点击可在新窗口打开查看
想在转账凭证的借方金额列做一个下拉窗口,贷方金额列也做一个下拉窗口,当点借方金额、贷方金额时就在下拉的共用窗口中加载相应的数据选项,如何获取转账凭证窗口点选的列名?
效果如收款凭证的下拉窗口一样。

图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20220315145041.png
图片点击可在新窗口打开查看


--  作者:采菊东篱下
--  发布时间:2022/3/15 15:13:00
--  
还有金额列通过DropForm 设置的下拉窗口,如何设置同时允许在金额单元格直接输入数据,我这样写不起作用
DataTables("收款凭证_Table1").DataCols("金额").AllowEdit = True

--  作者:有点蓝
--  发布时间:2022/3/15 15:23:00
--  
回1楼:http://www.foxtable.com/webhelp/topics/2704.htm

回2楼:设置下拉窗口和单元格能不能编辑没有半毛钱的关系。把这个表,以及下拉窗口和这个表有关的所有代码都注释掉,然后一个个启用,看是哪个代码影响的

--  作者:采菊东篱下
--  发布时间:2022/3/15 15:32:00
--  
For Each dc As DataCol In Tables("财务数据源").DataTable.DataCols
     If dc.Name = "借方金额" Then
......
     end if
next
我这样写好象并不起作用。

--  作者:采菊东篱下
--  发布时间:2022/3/15 15:34:00
--  
e.Form.DropTable.DataCol.Name = "借方金额"
这样写又报错

--  作者:有点蓝
--  发布时间:2022/3/15 16:07:00
--  
if e.Form.DropTable.DataCol.Name = "借方金额" then
 .....