导读 您好,现在柳柳来为大家解答以上的问题。vbs编写各种趣味小程序，vbs小程序代码相信很多小伙伴还不知道,现在让我们一起来看看吧！1、亲，代
您好,现在柳柳来为大家解答以上的问题。vbs编写各种趣味小程序，vbs小程序代码相信很多小伙伴还不知道,现在让我们一起来看看吧！
1、亲，代码如下哦：Dim WshShell,BtnCodeSet WshShell=WScript.CreateObject("***.Shell")Randomize()Num=Int(99*Rnd())BtnCode=WshShell.Popup("请猜数大于50",,"请选择",4+32)Select Case BtnCode Case 6 If Num>50 Then MsgBox "恭喜你，你赢了!" Else msgbox "你选错了哦。
2、别气馁!数字为：" & Num Case 7 If Num<50 Then MsgBox "恭喜你，你赢了!" Else msgbox "你选错了哦，别气馁!数字为：" & NumEnd Select。
本文就为大家分享到这里，希望小伙伴们会喜欢。