[Programmer-VB] program expired

[M. Ridwan Muslim]

Dear Guys,
saya mau tanya nih.
bagaimana membuat program expired sederhana yang tidak bisa diakalin di 
tanggal komputer
saya punya script kayak dibawah, tapi khan sebenarnya bisa diakalin 
dengan merubah tanggal komputer.
thanks.

TglExp = Format(Date, "dd-MM-yyyy")
If Right(TglExp, 4) = "2008" Then
        MsgBox "The Program is Expired, Contact Your Program Consultant"
Else
    Load FrmFront
    FrmFront.Show
End If

Rgds/ Ridwan