产生三十个不同的两位随机整数怎么有VB语言写？
答案:2 悬赏:0
解决时间 2021-02-20 20:44
- 提问者网友：熱戀丶瘋
- 2021-02-20 06:54
产生三十个不同的两位随机整数怎么有VB语言写？
最佳答案
- 二级知识专家网友：野性且迷人
- 2021-02-20 07:22
Option Explicit Private Sub Form_Activate() Dim arr(1 To 30) As Long, i As Long For i = 1 To 30 arr(i) = Int(90 * Rnd) + 10 Print arr(i) Next End Sub
全部回答
- 1楼网友：ー何必说爱
- 2021-02-20 07:40
dim a%(30),x%,i%,j% randomize for i = 1 to 30 x=int(rnd*90+10) for j=1 to i if x=a(j) then i=i-1 else a(i)=x next j next i
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯