我用VB写了个程序,想30分钟的时候LABLE1.显示一个东西1小时的时候又显示一个东西如此循环.

我用VB写了个程序,想30分钟的时候LABLE1.显示一个东西1小时的时候又显示一个东西如此循环.我的代码只实现了30分钟显示,但是我要第二个30的时候显示不一样的东西应该怎么做呢?第3个30的时候又显示第一个东西循环
Private Sub Timer1_Timer()
'设置时钟为30000
Static n As Integer
n = n + 1
If n Mod 1 = 60 Then '30分钟
Label1.Caption = "温馨提示："
form1.Visible = True
SetWindowPos Me.hWnd, -1, 0, 0, 0, 0, 2 Or 1
Timer2.Enabled = True
End If
End Sub

追问：给点代码把但是到下个60的话好像程序就不知道自己干什么了哦,有可能还以为是30呢.

答案：你可以定义一个Integer：当30分钟时为0 一小时时为1 
加个判断
当30分钟时为0执行…… 一小时时为1执行……  然后一个半小时又为0…………
记得采纳~

上一个：求VB大神帮忙
下一个：vb编程，怎么根据所选时间显示sql数据库中的信息？？？？？？？？？？？？？？？？？？？？？？？？？