vbs中的随机数

程序有太多错，以下是改好的（你复制就可以运行了）Randomizea = Int((50* Rnd) + 2)b=Int((3*Rnd)+1)C = Int((3 * Rnd)+ 1)msgbox("欢迎使用数字游戏机")msgbox("游戏支持2人同游")msgbox("下面会随机出现数字")msgbox("若是抽到3的倍数，则要完成惩罚")msgbox("若是抽中2的倍数，则可以获得奖励")msgbox amsgbox aif inputbox("怎么样?结果出来了吗?若是抽中了3请扣1, 2扣2")="1"thenmsgbox bmsgbox "大喊:我好撒",0, "这是抽中- -的结果"msgbox "让旁边的朋友打你一下不准打疼了",0,"这是抽中二的结果"msgbox "对着窗户大喊:你们都是猪",0,"这是抽中三的结果"elsemsgbox Cmsgbox "你可以随意让你的朋友做一件事不准太过分",0,"这是抽中- -的结果"msgbox "你可以让你的朋友给你0.5元~ 1元的现金",0, "这是抽中二的结果"msgbox "你可以让你的朋友完成一-次真心话或者大冒险",0,"这是抽中三的结果"end if