summaryrefslogtreecommitdiff
path: root/windows 95/2002 virus labels.vb
blob: 3ea801eeef7edaf14b60935228af1ed04d129f05 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
Public Class _2002_virus_labels
    Dim white As Boolean = True
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If white = True Then
            original.ForeColor = Color.Black
            white = False
        Else
            original.ForeColor = Color.White
            white = True
        End If
    End Sub
End Class