You cannot easily do this with VBScript. (It would be nice if you could do something like choice = MsgBox("Please select my next action", array("attack", "skills", "magic", "run", "take", "help"))).
But you can do a good old hack-create-a-IE-instance-with-choice-hack. You can find examples and explanations of the Scripting Guys Blog or on the Rob van der Voude website .
: HTML- VBScript, HTA. , , , VBScript , .