在VB6为什么我无法把CmdChange1和Cmdchange2弄成有边框和无边框

来源:百度知道 编辑:UC知道 时间:2024/05/21 09:03:42
Private Sub Command1_Click()
LblShow.BorderStyle = 1
End Sub
我看了教程,应该是这样做的,为什么CmdChange1没有变呢?我想变有边框,高手帮我解答下,变字体也是这样情况握
题目是这样的 习题一:创建一个标签(LblShow)、两个按钮(CmdChange1、CmdChange2),点按 CmdChange1 ,标签有边框;点按 CmdChange2 ,标签无边框。

是不是因为你的事件模块名称与按钮名称不相符???

Private Sub Command1_Click() '这里应该是 CmdChange1_Click
LblShow.BorderStyle = 1
End Sub

要检查所有控件名称与事件模块名称要保持一至!

检查所有控件名称与事件模块名称要保持一至