采用文本框+ Dlookup 函数 代替组合框作为录入界面控件的demo

zpy2

求助：请高手抽空斧正一下下O(∩_∩)O~

1、上面这个办法，主窗体上的控件(文本框)能够实现。子窗体的控件却不能用事件“获得焦点”来实现立即更新！用了“退出”，显示慢半

这个问题，听不太明白，是要做成什么？

zpy2

2、通用参照窗体的值来源于一个临时表，是否可以代码动态加载，比如用listBox承载候选值，筛选时遍历LiitBox，但这个筛选本人写不出来。
你写的，我都看不懂，需要达到什么效果，什么叫 动态加载，附件本身 是 删除 添加 就是动态的。

筛选时遍历LiitBox
是指用 非绑定的 listBox?

总之，不太明白需要达到什么效果？
--------------------------------------------
'用文本框录入的用法，相对来说代码多点麻烦点，但是界面更整洁美观
相对于 组合框吗？ 貌似差不多。见附件

'文本框的失去焦点，用Dlookup返回值

Private Sub Customer_LostFocus()
     '1、用 Dlookup 从数据源获取值,用两个条件: 代码= 或 值=, 这样用户可以输入值或代码均可
   
    '2、返回值可能为空(用户输入错误),用 Nz
   
    Me.Customer = Nz(DLookup("[cusName]", "tblCustomer", "[cusCode]='" & Me.Customer & "' Or [cusName]='" & Me.Customer & "'"), "")
   
End Sub

zpy2

嗯，你说的对，这种多字段的的确用文本框+DLookup了

zpy2

题：A窗体的子窗体当前控件D却不 能用事件getfocus来刷新，我理解是： 当A窗体再次成为当前时，虽然子窗体 控件D“似乎”获得焦点（光标在闪）， 但“真正”获得焦点的是他的父窗体？ 一种是用vb网格控件，另一种，在进入输入窗体时，保存 引用 如 set ctl= Screen.PreviousControl，返回后，用ctl.setfocus，行列，应是 调出输入窗体前的控件被激活。 如果就一列即名称一个控件，用硬编码，直接指定控件名称setfocus也行

zpy2

或：当我们把一个窗体“数据表 化”后，在当前子窗体内，同时出现 了“n个控件D”（n行），Access如何确 定我们想getfocus的那一行控件D？ 把一个非绑定的文本框放到有绑定文本框的 数据表视图 窗体？这恐怕不行。

zpy2

或：当我们把一个窗体“数据表 化”后，在当前子窗体内，同时出现 了“n个控件D”（n行），Access如何确 定我们想getfocus的那一行控件D？ 把一个非绑定的文本框放到有绑定文本框的 数据表视图 窗体？这恐怕不行。

zpy2

fd901028 发表于 2015-8-19 20:57
frm Refer“参照窗体”  是想做成一个通用参照模块（一处水源供全国）。
  参照的思路是：从一个主窗体 ...

或：当我们把一个窗体“数据表 化”后，在当前子窗体内，同时出现 了“n个控件D”（n行），Access如何确 定我们想getfocus的那一行控件D？
把一个非绑定的文本框放到有绑定文本框的 数据表视图 窗体？这恐怕不行。
你说的应是MsFLexGrid吗？不是DataGridView，DataGridView是.net的吧？