集捷信息网 > 在ASP中，VBScript有多种控制程序流程语句，如If…Then, For … Next, Do … Loop, Exit等语句。

在ASP中，VBScript有多种控制程序流程语句，如If…Then, For … Next, Do … Loop, Exit等语句。

任意选两个语句分别写一段使用的代码,,,求代码

2025-12-17 06:40:50

推荐回答（1个）

回答1：

Private Sub Form_Load()
Dim p As Integer
Randomize
p = ""
For i = 1 To 10
Do
x = Int(Rnd * 91 + 10)
yes = 0
For j = 1 To i - 1
If x = a(i) Then
yes = 1
Exit For
End If
Loop While yes = 1

Next i
End Sub

最新问答

荔枝多少钱一斤

永康至福州的高铁 m.mipang.com

有条博美换了两次主人最后第三次到我家随便你打也好骂也罢旧的主人来找就是不肯离开我又没给它

推上神坛的《三体》有多少科学与BUG，最大BUG又是什么？

09年高考倒计时空间FLASH

迪加通信170号有钱为什么用半年或一年无故停机

有谁玩过《上旋网球》？

我的手机是魅蓝metal，从优酷微博看视频时，只有听筒有声音，这是为什么，怎么设置回来呢？

2018年3月8日到2019年6月10日多少天

在QQ附近聊天里跟一个女的聊了很久几乎都是她找我对我似乎有点好感为什么找她要照片总是回避我呢？