计算机二级VB，求代码书写，急等
答案:1 悬赏:40 手机版
解决时间 2021-02-27 16:32
- 提问者网友：末路
- 2021-02-27 01:08
计算机二级VB，求代码书写，急等
最佳答案
- 五星知识达人网友：山有枢
- 2021-02-27 02:08
下面是全部代码
Private Sub Check1_Click()
If Check1.Value = 0 Then
Me.Caption = "隐藏按钮"
Command1.Visible = False
Check2.Visible = False
Else
Me.Caption = "显示按钮"
Command1.Visible = True
Check2.Visible = True
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 0 Then
Command1.Enabled = False
Else
Command1.Enabled = True
End If
End Sub效果
Private Sub Check1_Click()
If Check1.Value = 0 Then
Me.Caption = "隐藏按钮"
Command1.Visible = False
Check2.Visible = False
Else
Me.Caption = "显示按钮"
Command1.Visible = True
Check2.Visible = True
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 0 Then
Command1.Enabled = False
Else
Command1.Enabled = True
End If
End Sub效果
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯