VB的一道很简单的题,我刚学VB的

来源:百度知道 编辑:UC知道 时间:2024/05/24 16:35:44
如题:创建一个标签(LblShow)、两个按钮(CmdChange1、CmdChange2),点按 CmdChange1 ,标签有边框;点按 CmdChange2 ,标签无边框。
第一个按钮的点击事件:
Private Sub CmdChange1_Click()
LblShow.BorderStyle = 1
End Sub

第二个按钮的点击事件:
Private Sub CmdChange2_Click()
LblShow.BorderStyle = 0
End Sub

为什么运行后不会改变按钮类型呢?

把Label.appearance属性设为Flat,容器背景色是vbBlack会出现你说的现象

这样试试:
Private Sub CmdChange1_Click()
LblShow..Visible = True
LblShow.BorderStyle = 1
End Sub

第二个按钮的点击事件:
Private Sub CmdChange2_Click()
LblShow..Visible = True
LblShow.BorderStyle = 0
End Sub

按钮类型?
不是标签的边框吗?
我测试过没问题啊
可以的
要不你加上
LblShow.Refresh
刷新试试

应该没有问题 你是不是将label控件设为不可用了呢?