- 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=19852)
-- 发布时间：2012/5/23 13:23:00
-- [求助]自定义录入界面之三（成功了看例子）
[求助]自定义录入界面之三（按例照做生效）
Q：1、现在可以回填编号了，我想回填更多字段怎么设置呢，这个功能很好用哦。
请老大看看下
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:测试请假登记.rar |
[此贴子已经被作者于2012-5-23 14:19:03编辑过]
-- 发布时间：2012/5/23 13:58:00
--
我窗口设计在，【请假登记表】那
-- 发布时间：2012/5/23 14:24:00
--
输入多列：
If e.Selected Then \'如果选择了值
Dim tbl As Table = Tables("员工资料_Table1")
If tbl.Current IsNot Nothing Then
e.Form.DropDownBox.Value = tbl.Current("编号")
Tables("请假登记表").Current("aaa") = tbl.Current("aaa")
Tables("请假登记表").Current("bbb") = tbl.Current("bbb")
Tables("请假登记表").Current("ccc") = tbl.Current("ccc")
End If
e.Form.DropDownBox.CloseDropDown()
End If
-- 发布时间：2012/5/23 14:26:00
--
Q: 这个函数放在那里呢。
-- 发布时间：2012/5/23 14:30:00
--
呵呵，我晕死了，设置在下拉窗口的DropDownClosed事件啊，我只是在你原来的代码加了三行代码而已。
-- 发布时间：2012/5/23 14:33:00
--
A:实验后这功能非常好用，可以用在很多地方，如、样品单、报价单、订单、生产单的取值、回写
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:测试请假登记.rar |
-- 发布时间：2012/5/23 14:48:00
--
A我比较笨，从来没开发过程序，以前只是搞软件实施培训的，对功能知道比较多，代码比较少，还请多多见谅。
其实我如果是准客户还算好的，还有的人更傻，
所以我想说既然是中国人开发的系统，还是得支持。