ساختن یک بچه ویروس جالب و سرگزم کننده

واضح آرشیو وب فارسی:سایت ریسک: View Full Version : ساختن یک بچه ویروس جالب و سرگزم کننده hamidreza.sn28-07-2009, 06:21 PMقفل کردن تمام ورودی ها مثل Keyboard و Mouse این کار با تابع BlockInput انجام میشه و تمام ورودیهای کامپیوتر رو قفل میکنه. توجه داشته باشید که سیستم عامل هنگ نمیکنه و به کار خودش ادامه میده امّا شما نمیتونید هیچ کاری انجام بدید به جز Restart کردن. یک پروژه جدید باز کنید و کد زیر رو تو قسمت جنرال فرمتون کپی کنید : Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Private Sub Form_Load() BlockInput True Sleep 5000 BlockInput False End Sub به محض شروع برنامه، تمام وروردیها به مدّت 5 ثانیه قفل میشن و بعد از اون دوباره به حالت اول برمیگردن. در اینجا تابع Sleep فقط برای اتلاف وقت به کار رفته و استفاده دیگه ای نداره. موفق باشید. :19: vbc12-08-2009, 04:20 PMبه نظر شما این کد کار میکنه یا نه dim a as integer for a=0 to 100 mkdir "c:a"& a next i bamaram.u18-08-2009, 03:48 PMحميد رضا كارت درسته bamaram.u19-08-2009, 12:54 PMسلام من از حرفه اي هاي ويژوال سوال دارم دو عدد دكمه داريم كه بايد اين كار رو انجام بدن دكمه اول با اولين كليك از نقطه a به نقطه b برود با كليك دوم از نقطه b به نقطه a برگردد كمه دوم با اولين كليك از نقطه c به نقطه d برود و همچنين اگر دكمه اول در نقطه b باشد آن را به نقطه a برگرداند و با كليك دوم از نقطه d به نقطه c برگردد اگر كسي با همين مثال كد رو برام بنويسه ممنون ميشم bamaram.u20-08-2009, 09:36 AMخواهش مي كنم به من جواب بدين من احتياج به كمك دارم bamaram.u20-08-2009, 09:37 AMراستي من يه ليست درختي مي خوام كي مي تونه كدش رو به من بده؟ ممنونش ميشم programer5926-08-2009, 01:11 PMببین برای جابه جایی کنترل باید از Left و Top کمک بگیری: [!!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!!] برای ساختار درختی باید از TreeView کمک بگیری اضافه کردن یک آیتم به Tree View: TreeView1.Nods.Add "WWW.P30WORLD.COM" TreeView1.Nodes.Add "PROGRAMER59" احسان.ف.:5: سایت ما را در گوگل محبوب کنید با کلیک روی دکمه ای که در سمت چپ این منو با عنوان +1 قرار داده شده شما به این سایت مهر تأیید میزنید و به دوستانتان در صفحه جستجوی گوگل دیدن این سایت را پیشنهاد میکنید که این امر خود باعث افزایش رتبه سایت در گوگل میشود

این صفحه را در گوگل محبوب کنید

[ارسال شده از: سایت ریسک]

[مشاهده در: www.ri3k.eu]

[تعداد بازديد از اين مطلب: 250]