Try again.' ,0+16, 'Error') X=msgbox('Oh no, in this files is has a virus! We're want to said you a message: You has been HACKED!' ,0+64, 'Message') X=msgbox('You has been hacked by me. Do you want to delete it or choose no to quit?', _ vbYesNo+vbExclamation+vbDefaultButton2, 'This file is deleted') X=msgbox('Error, cant delete. Lets started!' Case vbNo = Wscript.Quit End Select MsgBox message, vbInformation sInput = InputBox('Enter your name') MsgBox 'Nice to meet you, ' & sInput sInput = InputBox('Enter your name's Windows to continued') MsgBox 'Ok, ' & sInput sInput = InputBox('Tell me your address') MsgBox 'Ok, ' & sInput sInput = InputBox('Enter your email') msgbox'Ok, is' & sInput X=msgbox('Ok, you can go use it now.',0+4096,'Finished') X=msgbox('Error code, 0x165877430' ,0+16, 'Fatal error') MsgBox ('This file has been deleted. Do you want to continue?', _ vbYesNo+vbExclamation+vbDefaultButton2, 'Info before started') Dim message Select Case result Case vbYes = message 'Ok. This is a code: result = MsgBox ('To open this file, you need to disable your antivirus. Hey I am make a fake virus but I get a message 'Expected statement'.

What is notepad ++ used for