想实现标签显示、不显示的交替闪烁功能，但不知道代码中的e.Form.TimerEnabled = False 和e.Form.TimerInterval = 4000 并不起作用？我的是想法不对。请帮忙。
Dim lb1 As WinForm.Label = e.form.Controls("Label1") '文字闪现
'Dim PmK As Integer = 320 '屏幕宽度象素
'Dim PmG As Integer = 640 '屏幕高度象素
Dim i As Integer
For i = 1 To 5
If i <= 3 Then
lb1.Visible = True '显示标签
lb1.left = 50 '标签左起点在50像素
e.Form.TimerEnabled = False '停止计时
MessageBox.show(lb1.left)
e.Form.TimerInterval = 4000 '计时间隔设定为4秒
e.Form.TimerEnabled = True'重新计时
MessageBox.show("?")
lb1.Visible = False '不显示标签
e.Form.TimerInterval = 3000 '标签计时间隔3秒
lb1.left = 150 '标签左起点在150像素
lb1.Visible = True '显示标签
MessageBox.show(i)
Else
MessageBox.show("//2")
e.Form.TimerEnabled = False
Return
End If
Next
加好友 
发短信
Post By：2025/3/19 9:19:00 [只看该作者]
