vb6 自定义控件中如何获得、设置控件在运行窗口中的位置、大小？

yingjie08102 2015-01-07 07:31:23

vb6 自定义控件中如何获得、设置控件在运行窗口中的位置、大小？
这个问题困扰了我很久，希望在此能得到答案，谢谢热心的人们！

...全文

199 2 打赏收藏转发到动态举报

写回复

2 条回复

切换为时间正序

请发表友善的回复…

发表回复

一如既往哈 2015-01-08

打赏
举报

回复

恭喜恭喜，接分......

yingjie08102 2015-01-08

打赏
举报

回复

会弄了

免费资源：自己收藏的一丁点自定义控件，窗体特效等。纯源代码，对想自己做控件的同学或许有点帮助。个人感觉不错而已，别拿鸭蛋砸我。

VB 控件随窗体自动调整大小，像窗口中的ListBox、Image、FileListBox、VB.Frame控件等，都可以随窗口的大小变化而变化，当用户拖动改变窗口大小时，这些控件的大小也会随之改变，这个功能的实现得益于自定义函数Form_Resize()，用此来控制各个控件的变化，来看代码：　　Dim x, y As Long 　　x = Form1.Width - 200 - Frame1.Width - Image1.Width 　　y = (Frame1.Height - Drive1.Height - Drive1.Top - 200) 　　Frame1.Width = Frame1.Width x / 2 　　Image1.Left = Frame1.Left Frame1.Width 100 　　Image1.Width = Image1.Width x / 2 　　Image1.Height = Me.Height - 600 　　Frame1.Height = Image1.Height 　　Dir1.Width = Frame1.Width - 280 　　File1.Width = Dir1.Width 　　Drive1.Width = Dir1.Width 　　Dir1.Height = y / 3 　　File1.Top = Dir1.Top Dir1.Height 100 　　File1.Height = 2 / 3 * y 　　此段代码被封装在按钮事件中，请参见源代码文件。

vb6取自定义控件所在MDI子窗口句柄,Usercontrol，vb6,MdiChildForm_Hwnd

一个自定义滚动条的VB滑块拖动程序源码，通过本源码例子您可学习一下如何在窗口中使用滑块，如何通过滑块改变数值，本示例是属于界面编程的范畴，主要演示拖动条如何使用，代码比较初级，对刚学习VB的朋友有一定帮助。

一个可折叠的VC++自定义列表控件一款VC++自定义的列表控件，可以展开、折叠。　　WINDOWS应用程序的创建一般都需要使用控件，像VB、DELPHI等编程环境都提供了相当多的控件供程序员调用，这些控件基本上能满足程序开发的要求，但有时也会有些不尽如意的地方，因此学会创建自定义控件有一定的重要性。本程序实现了一个可以折叠、可以更换成员类型的特效列表控件。

1,451

社区成员

41,355

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章