VB中动态创建控件..docVIP

VB中动态创建控件/s/blog_5ccce2820100lof8.html 创建数据驱动窗体 所谓数据驱动窗体就是根据所请求的数据的不同生成相应的窗体。举例来讲，假设你现在有一个数据库，其中有些字段必须根据登录者的身份加以显示，授权级别高的用户可以浏览并修改这些字段的内容；授权级别一般的用户只能浏览这些字段中的数据；授权级别低的用户则不能浏览这些字段中的内容。要做到这一点就得利用VB动态添加控件的功能。 动态创建控件 无论你想要创建何种类型的数据驱动窗体，你必须知道如何在运行时动态地创建控件。你可以通过控件数组做到这一点，但VB6的Controls集合所提供的Add方法，功能更强大，灵活性更高。使用该方法，你不需要在设计时将控件的实例放在窗体上。实际上，用Add方法你甚至可以创建程序在编译时根本不存在的控件。这种方法的用法也很简单： 声明一个窗体级的变量Dim WithEvents txtTotal As TextBox Sub CreateTextbox() 创建新的Textbox控件Set txtTotal = Controls.Add(VB.TextBox, txtTotal) 将控件移动到你所需要的地方txtTotal.Move 1000, 800, 1200, 300 创建时，所有的控件都是不可见的txtTotal.Visible = TrueEnd