for i=1 to 52
 a1=a1+byarray1[i]
nextfor i=105 to 156
 a2=a1+byarray2[i]
nexta3=a1+a2
a3就是两个数组你需要的那些元素组成的
不知道我的理解是否正确?!

解决方案 »

  1.   

    dim SubStr1 as string
    dim SubStr2 as string
    For i = 1 To 52
         SubStr1 = SubStr1 + Chr(bytArray1(i))
    Next i
    For i = 105 To 156
         SubStr2 = SubStr2 + Chr(bytArray2(i))
    Next i
    然后比较SubStr1和SubStr2
      

  2.   

    dim i as integer
    dim j as integer
    for i=1 to 52
    if array1(i)<array(104+i) then
      j=1
       exit for
    else if array1(i)<array(104+i) then
      j=0 
       exit for
    end if
    next i
      

  3.   

    或比较
    mid (array1,1,52)
    mid (array2,105,52)