vb.net如何打乱数组 数组vb编程问题-成都快上网建站

vb.net如何打乱数组 数组vb编程问题

VB.NET是否有数组排序方法

游戏中遇到这样的问题,需要将一组已知的数据打乱,按照以前和现在的做法,总结了以下方法。

目前创新互联公司已为千余家的企业提供了网站建设、域名、网络空间、绵阳服务器托管、企业网站设计、大新网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。

方法一,最笨的菜鸟方法,也是容易想到的(幸好我没想过这种方法 :))

从已知数组中随机一个数,然后加入到另一个数组中,在加入之前,先检查是否已经加入过。

这种方法有很大运气成分,且数据越大,效率越低,超过一定数目,则程序几乎无法执行,会一直卡在那里,代码:

[java] view plain copy

package com.test;

import java.util.Random;

public class TestArray {

public static int runCount =0;//用于记录方法运算次数

怎样将一个数组内元素的顺序打乱

数组大小 n; 一次产生2个 随机下标,交换这2个数;像炒饭似地 做它100次,就打得够乱了。

例子:

#includestdio.h

#includetime.h

int main( )

{

int a[50],v;

int i,i1,i2;

int n=50;

for (i=0;in;i++) a[i]=i;

srand(time(NULL));

for(i=0;i100;i++){

i1 = rand() % n;

i2 = rand() % n;

v=a[i1];a[i1]=a[i2];a[i2]=v;

}

for (i=0;in;i++) {

if (i % 10 == 0) printf("\n");

printf("%4d ",a[i]);

};

return 0;

}

VB 打乱数组 简单的说就是有一个数组(1,2,3,4) 他这个数组顺序打乱!求高人指点

Dim a(20), k

Dim i As Integer, j As Integer

Randomize

For i = 0 To 20

a(i) = i

Next

Print "原始数组:"  Join(a, ", ")

For i = 0 To 20

j = Int(Rnd * (UBound(a) + 1))

k = a(i)

a(i) = a(j)

a(j) = k

Next

Print "打乱后的:"  Join(a, ", ")


网站题目:vb.net如何打乱数组 数组vb编程问题
标题路径:http://kswjz.com/article/hhieoe.html
扫二维码与项目经理沟通

我们在微信上24小时期待你的声音

解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流