Office中国论坛/Access中国论坛

标题: 三态列表框和三态选择框 [打印本页]

作者: 快乐王 时间: 2009-3-22 22:50
标题: 三态列表框和三态选择框
本帖最后由快乐王于 2009-3-23 08:46 编辑

三态列表框 wsb_List
　　Access 提供的组合框只有单选功能，列表框虽有多选功能，但通常是一个多行的选框，要占用较大空间，强制为单行显示时用微调按钮选择非常不方便。为此制作了一个集组合框与列表框的单选、多选、列表功能于一身的三态列表框 wsb_List。三态列表框 wsb_List，貌似微软的组合框 Combo 但又加入了 List 列表框在“简单”多重选择状态下的多选功能。
　　三态列表框的实现思路是：用一个文本框加一个三角形图片装扮成选择框，当文本框可见时将列表框高度收为0，当三角形图标被点击时，隐藏起文本框，并将列表框展开。
　　三态列表框 wsb_List 的制作过程：

用抓图软件抓一个组合框的下拉三角形图标“[attach]36849[/attach]”，存成 .ico 文件格式，文件规格 18*18-24位色，存放到“root\image\”文件夹下（root为软件安装根路径）；
在窗体中制作一个文本框wsb_ListText，调整其高度为0.451cm，默认值为"请选择……"；
将“1”中准备好的图片插在紧贴着文本框 wsb_ListText 的右边，缩放模式：缩放，上边距与文本框平齐，宽度与高度均为0.478cm，取名为：wsb_ListImage；
在窗体中制作一个列表框控件wsb_List，宽度、上边距和文本框相同，高度设置为0cm，多重选择设为“简单”。

　　三态列表框 wsb_List 被选数据可以从 wsb_ListText、wsb_List.Column(0, (varItem))或wsb_List.Column(1, (varItem)) 中获取，既可以直接在 Sub RowsSelected() 程序段中插入代码调用，也可以比照 Sub RowsSelected() 程序段另外专门写一个过程进行后续处理。

三态组合框 wsb_Combo
　　Access 提供的组合框只能通过选择或在鼠标双击事件中加入代码提取组合框中的选项。组合框的鼠标单击、鼠标按下、鼠标释放与控件数据更新后事件搀和在一起无法区分。为此特意制作了一个能够区分组合框鼠标单击、双击和选择三种状态并获取不同选项数据的三态组合框 wsb_Combo。
　　三态组合框的实现思路是：用一个文本框和一个组合框叠合在一起，通常，组合框收拢到只有一个三角形大小，它左边的文字框部分就用文本框来模拟，并接受鼠标单击、双击事件；当点击三角形时，组合框才向左展开。
　　三态组合框 wsb_Combo 的制作过程：

在窗体中制作一个文本框wsb_ComboText，调整其高度为0.451cm；
紧贴文本框右边制作一个组合框控件wsb_Combo，宽度为0.476cm、高度和上边距和文本框相同。

　　三态组合框wsb_Combo 被选数据可以从 wsb_ComboText 中获取，可以直接在 Sub ViewSelected() 程序段中插入代码调用。但是双击文本框wsb_ComboText时，一开始只是被认为是单击事件，紧接着第二次才被确认为双击事件，所以在单击事件中不能用象“MsgBox”这类让程序停顿下来的语句，否则，将不会得到双击文本框wsb_ComboText 的事件响应。
　　《三态列表框和选择框.mdb》见本文附件。

作者: lymin 时间: 2009-3-23 00:19
不错收了

作者: luhao 时间: 2009-3-23 01:07

三态列表框 wsb_List
　　Access 提供的组合框只有单选功能，列表框虽有多选功能，但通常是一个多行的选框，要占用较大空间，强制为单行显示时用微调按钮选择非常不方便。为此制作了一个集组合框与列表框的单选、多 ...
快乐王发表于 2009-3-22 22:50

一下子看不懂，下了慢慢学

作者: 快乐王 时间: 2009-3-23 08:52
对不起前面6位朋友，压缩包中wsb_ListImage控件属性设置错误，看不到图片，现在已经更正。

作者: tmtony 时间: 2009-3-23 10:37
不错,有些新意

作者: 快乐王 时间: 2009-3-23 10:48
谢谢管理员的评价。

作者: shiwan1 时间: 2009-4-3 16:41
ding ~~~~~~~

作者: 阿六爱狗 时间: 2009-4-4 11:01
学习了

作者: chaojianan 时间: 2009-4-5 12:37
谢谢分享，下载了看看。

作者: zzwxm98 时间: 2009-4-19 11:25
谢谢分享，下载了看看

作者: W886655 时间: 2009-5-22 23:24
总之，运算式在ACCESS中的应用是很广泛，包括：3 M% z6 u" n7 N0 _

* l4 k7 `" H! T5 |' W8 G% `0 @* VBA 模块控制流程与循环的条件判断
. O! \: M6 l; M  l
- p7 ^& L: [" i( b* e* SQL 指令的条件判断& t6 T  ~4 r% J$ B4 z* c2 m
7 q- K/ M. ^& ~7 v+ D
* 宏中的条件判断3 h* }+ X. E$ J' q( X) N
1 w0 d6 w# {. r
* 数据表字段中的默认值属性3 \& Q# U9 E( |! ]7 v9 `! j( [: O
$ P3 o& z1 \& X; O+ Y
* 数据表的验证规则属性
' e/ V5 i" z6 ?
# \+ l! j5 y0 k# o2 j4 U* 查询中建立的计算字段
- y) J  p6 h. Z, j* _) z# i8 b. w9 Q" k2 c( [/ G
* 输入字段中准则属性1 O4 x) e7 D- S8 [
' L$ p9 t1 M4 H" n
运算式虽然很重要,但是它的结构很简单，依照运算符所需要的运算元数量来分共有两类：
" M4 Q0 y$ ]& Z  C3 h5 X( q
  H' |4 H# d2 k& Z( l* 单运算元：每个运算符只需要一个运算元。其格式：

作者: xlyw 时间: 2009-6-3 08:20
谢谢楼主提供精品共享

作者: 1100122566 时间: 2009-6-5 16:18
蛮好的，不过没看出来有很大用处

作者: chenyingfengsx 时间: 2009-6-19 20:48
ddddddddddddd

作者: jerrychan715 时间: 2009-6-23 13:02
谢谢分享

作者: bd4acw 时间: 2009-6-23 21:31
认真学习下，谢谢！

作者: wzh 时间: 2009-7-29 14:10
谢谢分享，下载学习！！

作者: benlty 时间: 2009-8-8 13:18
学习中

作者: 鱼儿游游 时间: 2009-9-12 21:57

作者: clearsp 时间: 2009-9-24 14:18
下来看看,谢谢分享.

作者: linag516 时间: 2009-9-25 14:15

作者: zhufree 时间: 2009-9-25 15:28
不错，偷梁换柱

作者: xxiaoxin321 时间: 2009-10-14 17:01
最近正在研究列表框，正好可以拿来做参考，谢谢了！

作者: lzbboy 时间: 2010-1-16 21:11
玩儿去玩儿去玩儿

作者: mpc-long 时间: 2010-3-2 17:02
一下子看不懂，下了慢慢学

作者: robitewx 时间: 2010-4-1 21:29
支持

作者: 号子 时间: 2010-6-15 23:53
看不懂，不知道实际用处

作者: huangqinyong 时间: 2010-6-16 17:03
谢谢分享，收下了

作者: lnace 时间: 2010-6-17 15:21
三态列表框 wsb_List
　　Access 提供的组合框只有单选功能，列表框虽有多选功能，但通常是一个多行的选框，要占用较大空间，强制为单行显示时用微调按钮选择非常不方便。为此制作了一个集组合框与列表框的单选、多 ...
快乐王发表于 2009-3-22 22:50
一下子看不懂，下了慢慢学

作者: gddsb 时间: 2010-8-18 10:16
不错,有些新意

作者: gddsb 时间: 2010-8-18 10:18
谢谢分享，下载了看看

作者: ZHENGLIAN 时间: 2010-9-5 16:45
谢谢分享，可以当一个备用工具收藏使用。

作者: of96 时间: 2010-9-5 17:34
谢谢分享，下载了看看。

作者: li08hua 时间: 2010-11-1 02:01
嗨，我无法下载啊

作者: msyangyi 时间: 2014-5-9 11:57
很好很有用

作者: 灰太郎 时间: 2023-5-8 21:31
下载下

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)