替身控件的妙用（源码）

cgsilicone

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

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

游客，如果您要查看本帖隐藏内容请回复

cgsilicone

轻风 发表于 2014-6-27 14:12
鼠标移到组合框时出现错误：
运行时错误'11'
除数为零

代码很粗糙，没有进行必要的容错处理。因为下拉框要在可见的情况下才能得到窗体句柄，因此启动时，程序会打下拉开组合框，如果组合框不能下拉，或下拉后太快收回，就可能得不到“下拉HWnd”，“下拉大小.Bottom”就会为0，出现错误。