导读 今天小编岚岚来为大家解答以上的问题。vb6.0简单的小程序，vbs小程序代码相信很多小伙伴还不知道,现在让我们一起来看看吧！1、亲，代码如下...

今天小编岚岚来为大家解答以上的问题。vb6.0简单的小程序，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。

本文就为大家分享到这里，希望小伙伴们会喜欢。