【vb产生随机数】Private Sub Command1_Click()form1.Cls Randomize Dim s(9) As Integer For i = 0 To 9 a = Int(Rnd * 10) s(a) = s(a) + 1 Print a; Next Print For i = 0 To 9 Print "s(" & i & ")="; s(i) NextEnd Sub

猜你喜欢

• 红梅修剪方法 怎样剪枝呢
• 废旧毛绒玩具怎么处理
• 什么句子能引起共鸣 句句精辟走心
• 王者荣耀无cd模式怎么进 请看回答
• 2022春节拜年祝福语简短句子 2022春节拜年祝福语简短句子介绍
• 早安励志问候语 比较励志的早安心语
• 禁食禁水可以吞口水吗？
• 超拽群名 必备超拽霸气群名
• 心脏早搏能根治吗
• 感冒了应该怎么办