VB中怎么加入一个标签

VB中怎么加入一个标签,第1张

1、首先我们新建一个工程,并新建一个标准Exe工程。

2、这时候我们找到工具箱中标签框。

3、这时候我们可以直接双击控件即可成功绘制。

4、或者我们可以选中他,然后在页面上绘制。

5、如果对它的外观不满意,我们在属性窗口中修改。

6、双击控件即可进入代码窗口。完成效果图。

根据我的判断。前面两个应该是错的。是创建、而不是显示已有的。

有两种方法,以下代码是简便的一种:

'(创建一个按钮即可运行)

Private hTimes As Long '这里是创建了几个Label的计数器

Private Sub Command1_Click()

Dim ExLabel As Label

hTimes = hTimes + 1

Set ExLabel = Me.Controls.Add("VB.Label", "label" &LTrim(Str(hTimes)))

With ExLabel '标准的几个属性,可以根据需要更改

.Width = 2415

.Height = 255

.Left = 0

.Top = hTimes * .Height '方位长度

.Caption = "hello world" '显示的文字

.Visible = True '显示的属性

End With

End Sub

如还有疑问,请追问。

答案系原创

Property AutoSize As Boolean

VB.Label 的成员

决定控件是否能自动调整大小以显示所有的内容。

Property BackColor As Long

VB.Label 的成员

返回/设置对象中文本和图形的背景色。

Property BackStyle As Integer

VB.Label 的成员

指出 Label 或 Shape 的背景样式是透明的还是不透明的。

Property BorderStyle As Integer

VB.Label 的成员

返回/设置对象的边框样式。

Property Font As StdFont

VB.Label 的成员

返回一个 Font 对象。

Property Height As Single

VB.Label 的成员

返回/设置对象的高度。

Property Left As Single

VB.Label 的成员

返回/设置对象的内部左边缘与容器左边缘之间的距离。

Property ForeColor As Long

VB.Label 的成员

返回/设置对象中文本和图形的前景色。

Property Width As Single

VB.Label 的成员

返回/设置对象的宽度。

Property Top As Single

VB.Label 的成员

返回/设置对象顶端与其容器顶端之间的距离。

另外:可以用ctrl键选中多个控件,通过【格式】菜单调整。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11833017.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-19
下一篇 2023-05-19

发表评论

登录后才能评论

评论列表(0条)

保存