VB程序代码学习记录20160710

来源:互联网 发布:网络直播平台流量计算 编辑:程序博客网 时间:2024/06/03 14:40
Private Sub C1_Click()If Shape1.Visible = True Then    Shape1.Visible = False    Shape2.Visible = TrueElseIf Shape2.Visible = True Then    Shape2.Visible = False    Shape3.Visible = TrueElse    Shape3.Visible = False    Shape1.Visible = TrueEnd IfEnd SubPrivate Sub C2_Click()EndEnd SubPrivate Sub Form_Load()Shape2.Visible = FalseShape3.Visible = FalseEnd Sub

红绿灯设置

0 0
原创粉丝点击