2)双击该按钮,窗体上就会出现一个Label控件。
3)可对它进行属性设置,并移动到窗体需要的位置。接着可继续按前方法添加Label控件。
4)Label 控件, Label 控件是图形控件,可以显示用户不能直接改变的文本。
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
如还有疑问,请追问。
答案系原创
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)