洗牌算法代码,VB.Net代码库,德仔网

代码语言

代码分类

【VB.Net】洗牌算法

作者:雷霆 / 发布于2015/2/28/ 1497


	protected void Button1_Click(object sender, EventArgs e)
	 {
	 string[] qian = new string[52]{"Ahe", "2he", "3he", "4he", "5he", "6he", "7he", "8he", "9he", "10he", "Jhe", "Qhe", "Khe",
	 "Ah","2h","3h","4h","5h","6h","7h","8h","9h","10h","Jh","Qh","Kh","Am", "2m", "3m", "4m", "5m", "6m", "7m", "8m", "9m", "10m", "Jm", "Qm", "Km",
	 "Af", "2f", "3f", "4f", "5f", "6f", "7f", "8f", "9f", "10f", "Jf", "Qf", "Kf"};
	 Response.Write("洗牌前"+"");
	 foreach (string s1 in qian)
	 {
	 Response.Write(s1 + " ");
	 }
	 System.Random r1 = new Random();
	 // System.Random r2 = new Random();
	 for (int j = 0; j < 5200; j++)
	 {
	 int a = Convert.ToInt32(r1.Next(0, 51));
	 int b = Convert.ToInt32(r1.Next(0, 51));
	 string t = string.Empty;
	 t = qian[a];
	 qian[a] = qian[b];
	 qian[b] = t;
	 }
	 Response.Write(""+"洗牌后：" + "");
	 foreach (string s in qian)
	 {
	
	 Response.Write(s + " ");
	 }
	 }

试试其它关键字

　洗牌　

同语言下

可能有用的

雷霆贡献的其它代码(16)