仿古地板图片大全:我要从9位数中随即抽取一个9位数请问用vb怎么编程

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 02:38:53
我要从9位数中随即抽取一个9位数请问用vb怎么编程
回答的好再追加30分

9个数放在数组里,用随机函数取数~!道理就这么简单,不会就去查帮助啊~!
唉,谁让我心肠好,详细一点:
定义个数组放九个数
定义个随机函数(随机函数好像是产生一个0至1之间的数,好就不用,忘了),把这个数乘10取整-1就是0-8,正好随机9个数
做个循环把刚才的“0-9”放进去,ok~!

Private Sub Command1_Click()
s = 0
For i = 1 To 9
s = s * 10 + Abs(Rnd(1) * 10)
Next i
Text1.Text = s
End Sub

用不着定义数组的。