[VB.NET]多线程下的随机数问题
2008-12-29 23:49
176 查看
![](http://www.zhzx123.com/VB.NET_03.gif)
<script type="text/javascript"><!--
google_ad_client = "pub-8333940862668978";
/* 728x90, 创建于 08-11-30 */
google_ad_slot = "4485230109";
google_ad_width = 728;
google_ad_height = 90;
//-->
</script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
多线程下的随机数问题
vb.net 多线程下的随机数,为什么每个线程产生的随机数一样啊,
哪位大哥有解决方法???
**************************************************
Private Function GetRndID(ByVal imin As Integer, ByVal imax As Integer) As Integer
Try
Dim iResult As Integer = 0
Randomize()
iResult = CInt(Int(((imax - imin) * Rnd()) + imin))
Return iResult
Catch ex As Exception
Return 0
End Try
End Function
__________________________________________________________________________
没有人能帮忙?谢谢了。Up一下~
__________________________________________________________________________
在沒有改不給種子數字時,每次新產生隨機數時都會一樣的。理解決方法有二
1)由主線程產生隨機數,并把此數傳遞給子線程。
2)同樣為主線程產生一個隨機數,這數作為子線程產生隨機數的種子數,再產生新的隨機數。
__________________________________________________________________________
每次 产生 随机数 前 使用
Randomize ()
问题解决
结帖
__________________________________________________________________________
Randomize() 没用的。每次还是都会一样的。
现在是多线程的问题...
****************************************************
chenxdb(菜鳥也瘋狂) 的方法有没有具体的例子??
现在如果我在产生随机数的时候.使用一个MsgBox(),弹出点信息,它产生的随机数就不会重复的。为什么?
__________________________________________________________________________
因为他使用时间作种子,多线程之行的时间差不多,所以种子一样,随机数也就一样
可以给每个线程一个不同的id,然后用id+时间作种子
__________________________________________________________________________
我用 Thread.CurrentThread.ManagedThreadId 和 DateTime.Now.Millisecond 一起作为种子,这次生成的不一样的,要庆祝一下。另外谢谢各位的讨论。
__________________________________________________________________________
主線程
Dim ran As New Random(Now.Millisecond)
For i As Integer = 0 To 100
System.Threading.ThreadPool.QueueUserWorkItem(New System.Threading.WaitCallback(AddressOf fun), ran.Next(0, 10000))
Next
子線程
Private Sub fun(ByVal i As Object)
i就為要傳遞的參數
End Sub
__________________________________________________________________________
说实话,不太懂,
Randomize () 多线程,单线程我用都 ok 啊
__________________________________________________________________________
相关文章推荐
- [VB.NET]关于多线程和截图保存的问题!
- [VB.NET]多线程的问题.
- [VB.NET]多线程操作的问题
- VB.net使用多线程与委托解决时间延迟的问题
- 学习VB.Net中几个问题
- [VB.NET]datareader的问题!!!!!
- [VB.NET]大容量文件编码转换问题,高手请进,在线等
- [VB.NET]datagrid样式问题
- [VB.NET]datagridview问题
- [VB.NET]困扰我几天的问题..一直想不出~~关于VB.NET的Event~~~~急~~~~~~~~!!!
- [VB.NET]listview问题
- [VB.NET]vs.net 2005 打包问题
- [VB.NET]font属性重要问题 在线等!
- [VB.NET]跪求高手解决DataGrid的问题!
- VB.NET导入Excel 的问题
- [VB.NET]数据插入问题
- [VB.NET]再次讨论向Excel插入图片方法,有兴趣的朋友可以进来看一下,帮我解决一下问题!谢了
- [VB.NET]登陆代码问题!!
- 谈谈C#和VB.NET代码的转换问题
- [VB.NET]有关控件组的问题!