Office中国论坛/Access中国论坛

标题: 替身控件的妙用(源码) [打印本页]

作者: cgsilicone    时间: 2014-6-26 21:09
标题: 替身控件的妙用(源码)
本帖最后由 cgsilicone 于 2018-12-7 15:37 编辑

根据sxgaobo的帖子解决组合框宽度不够显示文字不全的问题

修改了数据多时(出现滚动条),提示条显示数据不正确的问题。
将类模块导入您的数据库,然后不用作任何修改(导入的代码和您原来的代码都不用修改),只需要在您的窗体中加入固定的三行代码(和提供的例子一模一样)。您的组合框宽度不够显示文字不全的问题就解决了。
中文写代码,没有注释也能轻松读懂。  




作者: 玉树TMD临风    时间: 2014-6-26 21:19
这也要回复可看?
作者: tmtony    时间: 2014-6-27 07:40
源码分享. 顶一下
作者: tmtony    时间: 2014-6-27 07:41
提个建议哦. 一般如果需要回复可见的贴 就不要设置需要金钱, 或直接可见,但需要金钱. 这样会比较好一些.
作者: yanwei82123300    时间: 2014-6-27 07:54
谢谢分享1!!
作者: 轻风    时间: 2014-6-27 14:12
鼠标移到组合框时出现错误:
运行时错误'11'
除数为零

下拉行号 = Fix((p.Y - 下拉位移) / (下拉大小.Bottom / IIf(替身.ListRows > 替身.ListCount, 替身.ListCount, 替身.ListRows)))
作者: cgsilicone    时间: 2014-6-28 11:46
轻风 发表于 2014-6-27 14:12
鼠标移到组合框时出现错误:
运行时错误'11'
除数为零

代码很粗糙,没有进行必要的容错处理。因为下拉框要在可见的情况下才能得到窗体句柄,因此启动时,程序会打下拉开组合框,如果组合框不能下拉,或下拉后太快收回,就可能得不到“下拉HWnd”,“下拉大小.Bottom”就会为0,出现错误。
作者: sxgaobo    时间: 2014-6-28 23:37
学习!!!
作者: aslxt    时间: 2014-6-29 07:52
快速回复一下
作者: cyber-bobo    时间: 2014-6-30 00:58
必须要顶
作者: wang1950317    时间: 2014-6-30 09:44
学习一下!
作者: zyp    时间: 2014-7-1 14:48
多谢分享
作者: tzh1600    时间: 2014-7-7 15:06
学习学习
作者: wen123456    时间: 2014-7-12 19:43
谢谢分享,学习使人进步
作者: zpy2    时间: 2014-7-15 06:49
谢谢!!!
作者: goodhope08    时间: 2014-8-11 20:04
谢谢分享!
作者: 站到终点站    时间: 2014-9-16 16:23
谢谢分享
作者: zhaihe001    时间: 2014-9-19 21:13
学习一下,多谢了.
作者: charliemailbox    时间: 2014-9-19 22:21
好好看看
作者: wzh    时间: 2014-9-29 19:31
O(∩_∩)O谢谢
作者: gaofei186    时间: 2015-11-6 21:40
看看一下
作者: Joshui    时间: 2015-11-7 00:23
尝试看看~
作者: 灰太郎    时间: 2015-11-8 09:59
禾禾禾禾禾禾禾禾禾禾和
作者: 灰太郎    时间: 2015-11-8 09:59
目目目目目目目目目上
作者: changxing    时间: 2016-4-15 20:55
#在这里快[模块/函数] 推荐]工作日志速回复#
作者: pbcwn2008    时间: 2016-4-15 21:06
谢谢
作者: 鄱湖人2012    时间: 2016-5-22 14:27
学习学习
作者: 764300778    时间: 2016-5-23 23:46
EEEE
作者: xlb004    时间: 2016-6-2 20:57
1111111111111111111111
作者: 陈可怡    时间: 2016-6-12 10:28
amazing!
作者: 快乐无心    时间: 2016-6-27 08:06
看过你的中文代码,很好啊
作者: maikyang    时间: 2017-4-22 11:42
dsafasewr df a fasd
作者: yyalm    时间: 2017-4-22 16:33
学习

作者: 秀才    时间: 2017-5-3 14:51
学习一下
作者: bosao    时间: 2017-7-2 18:10
这个功能很实用,学习下大神的解决之道




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3