- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]带查找功能的下拉目录树 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=106890)
-- 发布时间：2017/9/17 19:28:00
-- [求助]带查找功能的下拉目录树
如图，下拉窗口朝上了，内容看不见，需要把整个窗口往下拖才行，如果将下拉窗口显示在下面呢
此主题相关图片如下：qq图片20170917192527.png
-- 发布时间：2017/9/17 19:53:00
--
你窗口高度设置太高了，要设置小一点。
或者 DropDownOpening 事件写代码
e.form.autoscroll = True
Dim point As Point = e.form.DropDownBox.Form.Panel.PointToScreen(e.form.DropDownBox.BaseControl.Bounds.Location)
\'e.Form.baseform.width = SysInfo.WorkingAreawidth-point.x
e.Form.baseform.height = SysInfo.WorkingAreaHeight-point.y - 30
-- 发布时间：2017/9/18 21:53:00
--
另外想实现以下功能，要在“销售统计表”里，把”店铺名称“同为“AAAAAAA",”日期“为”预算期间“上一年同一月份的”销量（春）“合计数取到红色框的”TextBox1“里，代码要如何写？
此主题相关图片如下：qq图片20170918214550.png
[此贴子已经被作者于2017/9/18 21:54:06编辑过]
-- 发布时间：2017/9/18 22:08:00
--
类似
e.Form.controls("TextBox1").text = DataTables("销售统计表").Compute("sum(销量)","店铺名称=\'" & e.Form.controls("comboBox1").text & "\' and 日期=#" & e.Form.controls("日期控件名称").text & "#")