Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Začnite nový štandardné EXE projekt jazyka Visual Basic . Pridať užívateľom definované typy s názvom " PROCESS_INFORMATION " a " STARTUPINFO " v kóde " Form1 " , ktorá je automaticky vytvorená s novým projektom . Jedná sa o štruktúry používané vo Visual Basic pre skupiny dát a sú potrebné druhy parameter funkcie " CreateProcess " . 
 2 
 Vytvorte dve konštanty , ktoré sú aj parametre funkcie " CreateProcess " . 
 
 Const synchronizač = 1048576 
 
 Const NORMAL_PRIORITY_CLASS = & H20 & 
 
 deklarovať funkciu " CreateProcess " ako " Private Declare Function CreateProcess Lib " Kernel32 " Alias " CreateProcess " . " 
 sims 3 
 deklarovať ďalšie funkcie pre otvorenie procesu ( " Private Declare Function OpenProcess Lib " kernel32.dll " " ) , ukončiť proces ( " Private Declare Function TerminateProcess Lib " Kernel32 " " ) a zatvorte rukoväť ( " Private Declare Function CloseHandle Lib " Kernel32 " " ) . 
 4 
 Pridanie príkazového tlačidla " Form1 " a pomenujte ju " cmdOpenNotepad . " v kóde pre " cmdOpenNotepad " , definovať premennú typu . PROCESS_INFORMATION , STARTUPINFO , reťazec reprezentovať null a dva túži pre návratové hodnoty 
 
 Odovzdajte Notepad.exe funkciu " CreateProcess " takto : 
 
 CreateProcess ( sNull , " Notepad.exe " , byVal 0 & , byval 0 & 1 & , NORMAL_PRIORITY_CLASS , byVal 0 & , sNull , sinfo , pInfo ) 
 5 
 Ukončiť proces s " TerminateProcess ( pInfo.hProcess , 0 a ) . " 
 
 Uzavrite držadlo na závite s " CloseHandle ( pInfo.hThread ) " a na proces s " CloseHandle ( pInfo.hProcess ) . "