VB代码“如何在字符串数组中随机抽取一个字符串”
Dim MyArray() As String
Dim Str1 As String
Str1="02 03 04 05 06 07 08 09 10 11 12 13..."
MyArray=Split(Str1," ")
For I=0 To Ubound(MyArray())
Debug.Print MyArray(I)
Next
给你个函数
function removeDuplication(byref sourceArray()) as variant()
..dim returns()
..dim uboundReturns as integer:uboundReturns = -1
..dim i as integer, j as integer
..for i=0 to ubound(sourceArray)
....dim found as boolean:found=false
....for j=0 to uboundReturns - 1
......if (sourceArray(i) = returns(j)) then found = true
....next
....if (not found) then
......uboundReturns = uboundReturns + 1
......redim preserve returns(uboundReturns)
......returns(uboundReturns) = sourceArray(i)
....endif
..next
..
..removeDuplication = returns
end function
相当你取随机数j后
j<=len(原字符串)情况下
调用函数
mid(原字符串,j,随机取的字符串的长度)
你也可以将长度也取随机数,即可得到随机取的字符串。
补充:
这样的话
你设置数组变量A(i)
用循环语句将其所有单元赋值
然后随机取 i 即可。
arr为你的字符串数组:
s = arr(CInt(Rnd * UBound(arr)))
ss为你的大字符串:
s = Mid(ss, CInt(Rnd * Len(ss)) + 1, 取的长度)
c语言怎么实现从一个数组中随机抽取一个元素?
return b;
怎样在一个数组中,随机抽取n个数字,然后相加
int main(){ define SIZE 10 int a[SIZE];int i,n,k;double sum=0;srand((unsigned)time(NULL)); \/\/随机种子 for (i=0;i<SIZE;i++) a[i]= (int) rand(); \/\/初始化数组元素值 for (i=0;i<SIZE;i++) printf("%d ",a[i]); printf("\\n"); \/\/打印出来做参...
VB怎样 随机提取10个数中的5个数存到数组中
先将这10个数字放在一个数组a(10)中。然后通过随机函数的调用来随机抽取数字。每次抽取一个,若抽取到的数字已被抽取,则进行下一次抽取。这大概就是基本想法吧。通过代码实现:Dim a(10) As Integer '存放要抽取的数字。Dim Fir(5) As Integer '存放抽取到的5个数字的下标,最后改为存该下标的...
如何在已知数组中随机抽取若干个不重复的数 MATLAB
n=[14:19,21,24,26,29,30]a=round(rand(1)*9)+2 b=randperm(length(n),a)n(b)
我想知道 vb 如何获取字符串中某个字符之后的所有字符
怎么遍历提取字符串数组中包含的某个字符 字符串数组,可以 for(String s: sArr){ } 字符串有方法 indexOf ~ 在excel中如何抽取字符串中的第假如需要抽取A1单元格的字符串 =MID(A1,5 其中5是代表第5个字符,1是代表抽取1个,假如1...
如何从现有的一维数组中随机抽取一个数(C#)
\/\/定义一个数组,用来产生随机数(一位数组你可以自己定义,我这里定义一个字符数组)private static char[] constant = { '0','1','2','3','4','5','6','7','8','9','a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r',...
如何用VB.NET生成一个随机字符串
用法 RndString(xx) xx为随机数字长度 比如12位长度的随机字符串 则为 RndString(12)字符串包含数字和大小写字母,函数如下:Function RndString(ByVal l As Integer) As String Randomize()Dim R, i As Integer Dim S As Char Dim returnStr As String returnStr = ""'a-z 的ASCII码是:97...
在matlab中如何在一个数组中随机选取n个数?
你只需要把数组的序号挑出来然后随机出现就可以了
java怎么从数组a中随机选取几个数放入数组b中,急
这是取随机数import java.util.Random;public class vder { public static void main(String[] args) { int a[]={1,2,3,4,5,6,7,8,9,0};boolean r[]=new boolean[a.length];Random random = new Random();int m = 5; \/\/要随机取的元素个数 if(m > a.length || m < 0)...
MATLAB从一维数组中随机抽取一个数,并且返回这个数的位置
T=rand(length(a),1)*(length(a)+1);a(T)