vba窗体在运行的时候动态添加控件的代码

一、动态添加CommandButton命令按钮

Dim mc As CommandButton

Static k

k = k + 1

Set mc = Me.Controls.Add("Forms.Commandbutton.1")

mc.Caption = k

mc.Top = Me.Controls(k - 1).Top + Me.Controls(k - 1).Height

Me.Controls.Remove "Commandbutton1"

二、动态添加文本框

Set myText = Controls.Add( "VB.TextBox ", "myTextBox ")

With myText

.Visible = True

.Text = "这是加载的动态控件 "

.Width = 3200

End With

猜你喜欢

  1. Word怎样添加控件和VBA脚本代码

    Word程序通过添加控件和执行脚本语言来满足各类实际办公需要.这对于刚接触Word程序的用户而言,可能对Word控件的添加方法以及执行脚本的编写并不太了解.下面小编就与大家分享一下Word控件添加执行 ...

  2. eMule运行的时候为什么许多应用程序会变慢

    eMule运行的时候许多应用程序会变慢这取决于eMule的设定,eMule可能会打开很多连接并占用很多的带宽。这会减慢其他的Internet应用程序,例如IE。尤其是不恰当的设置或太高的连接数会引起严 ...

  3. 使用运行功能怎样添加wifi打印机

    一年接近尾声了,本单位组织所有员工进行业务资料整理,临时办公室没有网线,8台笔记本暂时用楼下的无线路由器上网,在添加打印机时却遇到了问题.以前曾写过一篇<Windows7怎么用"运行& ...

  4. Windows Installer自动修复造成注册表内容重置

    这几天碰到个很奇怪的问题,软件安装完了之后,使用正常,但是在重新启动之后注册表里面的用户设置居然丢失。 进注册表看的时候发现注册表键都在,只是值的内容没了。根据Process Monitor的报告,是 ...

  5. windows服务的手动添加及删除教程

    服务,是指执行指定系统功能的程序、例程或进程,以便支持其他程序,尤其是低层(接近硬件)程序。其实,服务就是一种特殊的应用程序,它从服务启动开始就一直处于运行状态,而普通应用程序在运行之后就处于休眠状态 ...

  6. 怎样使用Word 2007控件制作合同书的应用实例

    我们需要用Word 2007做一份采购合同书。它与普通Word文档的不同在于,其中的大部分内容是不需要更改的,甚至不允许更改。另外一些内容,比如涉及到公司的名称、地址、帐号等不允许出错,还包括一些可选 ...

  7. Word 2007控件应用实例&colon;采购合同书

    我们需要用Word 2007做一份采购合同书。它与普通Word文档的不同在于,其中的大部分内容是不需要更改的,甚至不允许更改。另外一些内容,比如涉及到公司的名称、地址、帐号等不允许出错,还包括一些可选 ...