Open note pad
Type this

lol=msgbox("message you want to display" ,1,"message title")


And save as "name you want".vbs
Number"1" can be change as you want

As this number value you can change button options.