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

2016-02-19 14:04 45 1 收藏

在这个颜值当道，屌丝闪边的时代，拼不过颜值拼内涵，只有知识丰富才能提升一个人的内在气质和修养，所谓人丑就要多学习，今天图老师给大家分享vba窗体在运行的时候动态添加控件的代码，希望可以对大家能有小小的帮助。

【 tulaoshi.com - Excel教程】

一、动态添加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

来源:https://www.tulaoshi.com/n/20160219/1606090.html

上一篇： 7.2 用ASP构建音乐服务器
下一篇： 7.5 通过表单创建word的一个例子

看过《vba窗体在运行的时候动态添加控件的代码》的人还看了以下文章更多>>

Delphi实现窗体控件自由摆布

标签： Delphi

Delphi关键字导航网络界面多媒体数据库图像控件文件硬件在做Mis项目过程中，有时需要让用户自己来实现窗体控件的布局，比如酒店管理中就需要对餐厅餐桌位置进行布局。要实现这种功能，必须做好三件事： 1、设置进入控件边缘的光标形状； 2、改变控件的大小及位置； 3、保存窗体控件的位置及状态，窗体下次启动时...

android ListView内数据的动态添加与删除实例代码

标签：编程语言网络编程

main.xml 文件：代码如下： ?xml version="1.0" encoding="utf-8"? LinearLayout xmlns:android="http://schemas.android.com/apk/res/android" android:layout_width="fill_parent" android:layout_height="fill_parent" &n...

能够修改Word命令的VBA代码

标签：电脑入门

在WORD中，我们可以通过修改WORD命令的方法，来方便地为WORD控件指定用户自定义的过程，完成或者转移(禁用)相应的内置方式.它的原理是利用相应宏名来置换过程的方法.在下面的三个部分中，我们可以体会其中的相同点与不同点。 Sub Example() Dim i As CommandBarControl For Each i In Application.CommandBars.FindControls If i.ID = 4 Th...

VBA动态设置Excel斜线表头的方法

标签：电脑入门

如果您需要直接绘制斜线表头的方法，那就得使用VBA的方法，以下内容与此相关，请继续阅读。用控件工具箱中的命令按钮控件，在工作表中绘制一个命令按钮，将Caption属性改为直接制作斜线表头，双击该按钮，在Click事件中编写代码，其中关键代码如下。关键代码： "获取行标题和列标题 Dim icol， irow As String icol=InputBox("请输...

excel按筛选颜色的VBA代码

标签：电脑入门

在excel中，使用可视化的简单操作方法，是很难根据颜色来筛选的，因此，我们只能使用VBA代码来实现。以下代码的功能是：除首行外，将当前单元格所在列数据与当前单元格不同颜色的行隐藏起来，数据首行为标题列。如果你有其它的需求，请自行修改代码。 Sub FilterColor() Dim UseRow, AC UseRow = Cells.SpecialCells(xlCellTypeLastCell...

查看更多精彩>>