如何在窗体上动态创建标签啊?
我想当鼠标点击窗体时,在点击处创建一个标签,怎么动态创建这个标签呢? 问题点数:0、回复次数:6Top
1 楼zgvslch(烟花离落)回复于 2005-06-03 22:33:23 得分 0
可以在设计时画一个标签,让其Visible为False,要显示的时候设Visible为True就可以了
label.visible=true/falseTop
2 楼Zezese(蓝酷云)回复于 2005-06-03 23:02:18 得分 0
upTop
3 楼lsftest()回复于 2005-06-04 21:39:08 得分 0
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim l As Control
Set l = Me.Controls.Add("VB.Label", "test")
l.BorderStyle = 1
l.Top = Y - l.Height / 2
l.Left = X - l.Width / 2
l.Caption = "test"
l.Visible = True
End SubTop
4 楼aijilong(小艾)回复于 2005-06-24 11:05:14 得分 0
用load
在设置它的top,leftTop
5 楼aspgril(童话)回复于 2005-06-24 11:12:52 得分 0
楼上的楼上,UPTop
6 楼fujlt(菜鸟)回复于 2005-06-24 11:21:49 得分 0
同意使用loadTop




