VB语言基础重要知识点07

今天我们一起来学习控件的显示或隐藏属性来完成一个字一闪一闪的效果。

效果图

我们需要控制“爆”这个字一闪一闪。我们先可以使用“模拟”按钮的点击，手工控制visible属性来控制字的显示或者隐藏。

一、控件的可视属性

控制控件隐藏或者显示的属性：visible

visible翻译成：可视

看得见属性值为：true

看不见属性值为：false

如果需要控制显示或者隐藏，我们需要对控件的visible属性进行判断，思路是，点击“模拟”按钮后，判断label控件的visible属性如果为true，那么就设置为false，否则就设置为true。

回顾一下if语句的格式。

if语句的格式：

用法1：

if 条件 then

这里是符合条件下执行的代码

endif

用法2：

if 条件 then

这里是符合条件下执行的代码

else

不符合条件下的代码

endif

我们本例的程序需要使用“用法2”。

我们可以通过print查看控件当前的值，最好通过代码调试的方式看程序运行的过程。

举例输出控件的可见属性：print label1.visible

二、时钟控件学习

时钟控件：timer

作用：控制每隔多少时间执行一次代码。

提问：双击时钟控件的效果是什么？

会自动生成如下代码：

Private Sub Timer1_Timer()

这里是每隔多少时间要执行一次的代码

end sub

以下对时钟控件timer的使用属性进行解析：

1.interval属性

控制时钟控件每隔多少时间执行一次，使用属性interval控制。

interval属性的时间单位为毫秒

1秒=1000毫秒

半秒=500毫秒

2.enabled属性

控制时钟控件是否可用的属性为：enabled

enabled属性值为true代表时钟控件可用

enabled属性值为false代表时钟控件不可用

默认情况下时钟控件timer的interval的值为0，那么这个时钟即可enabled属性的值为true，此时时钟控件也不可用。

本节知识源代码：

form1代码

Private Sub Command1_Click()
Form2.Show
End Sub

form2代码：

Private Sub Command1_Click()
Print Label1.Visible

End Sub


Private Sub Timer1_Timer()
If Label1.Visible = True Then
    Label1.Visible = False
Else
    Label1.Visible = True
End If
End Sub