VB 如何动态删除label
比如添加一个任意label控件,设计一段程序删除它,再添加一个textbox控件进行选择性的删除(在textbox中输入label名称,就可以删除当前label)我是说假...
比如添加一个任意label控件,设计一段程序删除它,再添加一个textbox控件进行选择性的删除(在textbox中输入label名称,就可以删除当前label)
我是说假如有3个label控件,我想删除一个,动态删除就是在界面上的textbox中输入label的名字就可以把这个控件删除,不是单单在程序上删除一个,而是这几个想删哪个就删哪个,删除是时不用改程序的那种,在界面上输入一个数据就可以完成删除的,大家继续帮忙,满意就给分了,在线等
执行不了,说未找到方法或数据成员??????
可以执行了,但它只能删除第一个label,第二个就不能删除了。还有就是删除后,永久删除怎么弄,谢谢
又OK一项,现在就差永久删除了,解决了就给分
别的都解决了,可以执行,现在就是删除了没永久删除,再打开程序还有
那有什么办法可以实现呢,详细点要源码,加分 展开
我是说假如有3个label控件,我想删除一个,动态删除就是在界面上的textbox中输入label的名字就可以把这个控件删除,不是单单在程序上删除一个,而是这几个想删哪个就删哪个,删除是时不用改程序的那种,在界面上输入一个数据就可以完成删除的,大家继续帮忙,满意就给分了,在线等
执行不了,说未找到方法或数据成员??????
可以执行了,但它只能删除第一个label,第二个就不能删除了。还有就是删除后,永久删除怎么弄,谢谢
又OK一项,现在就差永久删除了,解决了就给分
别的都解决了,可以执行,现在就是删除了没永久删除,再打开程序还有
那有什么办法可以实现呢,详细点要源码,加分 展开
4个回答
展开全部
label控件可以显示可以不显示,你可以设置它的visible属性,让他隐藏不就可了,也可以让他的caption属性为“”(空)
如果非要删除这个空间
那就只能定义控件对象了 dim labelA as label
set labelA =new label
然后再对labelA做操作
如果非要删除这个空间
那就只能定义控件对象了 dim labelA as label
set labelA =new label
然后再对labelA做操作
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
有很多label的,不现实,不是一个
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
VB6用户可以输入以下代码:
(我们先设textbox的名称是text1,三个Label的名称统一为Label,设置Index,Index从1开始。)
Private Sub text1_change()
Dim i As Integer
Dim t As String
t = Text1.Text '随时获取text1的文本
i = 1
For i = 1 To 3
If t = Label(i).Name & Label(i).Index Then
Label(i).Visible = False
End If
If t = "ReDoAll" Then '实现撤消所有删除功能
Label(i).Visible = True
End If
Next
End Sub
(我们先设textbox的名称是text1,三个Label的名称统一为Label,设置Index,Index从1开始。)
Private Sub text1_change()
Dim i As Integer
Dim t As String
t = Text1.Text '随时获取text1的文本
i = 1
For i = 1 To 3
If t = Label(i).Name & Label(i).Index Then
Label(i).Visible = False
End If
If t = "ReDoAll" Then '实现撤消所有删除功能
Label(i).Visible = True
End If
Next
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询