VB中遇到的点小问题,麻烦各位指教下

来源:百度知道 编辑:UC知道 时间:2024/05/28 04:14:15
Private Sub Cmd1_Click()
LblShow.FontName = "黑体"
LblShow.Caption = "我就不信咯"
End Sub

Private Sub Cmd2_Click()
LblShow.FontSize = 13
LblShow.Caption = "我就不信咯"
End Sub

Private Sub Cmd3_Click()
LblShow.FontBold = True
LblShow.Caption = "我就不信咯"
End Sub

请问我这个可不可以再简化下,每句都要加个LblShow.Caption感觉多麻烦
如果可以简化的话,麻烦各位指教下

如果LblShow.Caption的内容不变,只要一次就可以了,
在form_load的事件里写上LblShow.Caption="我就不信咯"

可以用WITH,要是设置属性多的能简化。(以下仅为示例,与楼主的代码实现的功能不一样!)
With lblshow
.FontName = "黑体"
.FontSize = 13
.FontBold = True
.Caption = "我就不信咯"
End With

答案:不能简化

因为,你要单击每个按钮立即显示标签文本,放在click()中是对的,如果只保留1个,但无法确定哪个按钮先单击.放在form_load()也不对,因为如果你是要点击后才显示的话,那就不满足要求.

尤其:是三个按钮显示不同信息时 更不能简化

如果你能确定三个按钮有先后点击顺序的话 可以去调两个.

用控件数组也许可以简单一点点,但不多