windows 95/2002 virus labels.vb


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 Then
            original.ForeColor = Color.Black
            white = False
        Else
            original.ForeColor = Color.White
            white = True
        End If
    End Sub
End Class