想用VB实现随机存取人名的问题。

[笑蓖麻]

我以前接触过VB，但是没深究。现在遇到了一个小问题，希望有人帮忙解决以下。

要求先把20个人的名字存到一个地方（我不知道是用动态数组好，还是静态数组好）

界面上有个输入框，我要在一个输入框里面输入一个的数，比如说4，然后就到这个数组里面随机（要随机取4个不同人的名字）取出4个人的名字，然后一起输出到textbox。

功能挺简单的。希望大家能帮帮我。

[guojl]

为了生成某个范围内的随机整数，可使用以下公式：Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
这里，upperbound 是随机数范围的上限，而 lowerbound 则是随机数范围的下限。
比如说4,得到这个数后再从数组里面读取即可!

[笑蓖麻]

楼上说的那个公式，我也问过人，但是自己还是不会用。

要是能有具体的代码可以看就好了。

以前学的VB都忘记的差不多了，重新学习ing

[happy_sea]

dim sName(1 to 20) as string
sName(1)="张三":sName(2)="李四":sName(3)="王五": ..... sName(20)="赵二十"
private sub command1_click()
dim n as integer
for n=1 to cint(text1.text)
text2.text=text2.text+sName(Int(20*Rnd)+1)+vbcrlf
next n
end sub
text1用来输入个数，text2用来输出人名,command1用来。。。

[happy_sea]

忽略了一点，以上没考虑“不同人的”名字，楼主自己完善一下吧。

[pigsanddogs]

刚刚有个帖子讨论了这个问题

[xc52201530]

用一个RANDOM 函数就可以解决了
有必要怎么麻烦吗?

[笑蓖麻]

刚刚有个帖子讨论了这个问题

---------------------
有这样的帖子么，我怎么没看到啊，能不能麻烦给个链接

[yuanxilin]

可以看“http://community.csdn.net/Expert/topic/4985/4985999.xml?temp=.7757685”