今天面试的时候碰到了一个面试题，在这里记录一下
 
                题目如下：
 
               给定两个有序数组 int[] a={1,2,3,4} 和int[] b={5,6,7,8},写出一个能将两个有序数组合并成一个大的有序数组的实现：
 
                
 
int[] a={1,2,3,8};
		int[] b={4,5,6,7};
		int[] temp=new int[a.length+b.length];
		int i=0,j=0,k=0;
		while(i<a.length||j<b.length){
			if(i==a.length&&j<b.length){
				temp[k++]=b[j++];
			}else if(j==b.length&&i<a.length){
				temp[k++]=a[i++];
			}else if(a[i]<=b[j]){
				temp[k++]=a[i++];
			}else{
				temp[k++]=b[j++];
			}
		}
		System.out.println(Arrays.toString(temp));
 
 

 
 
 
  
let arr = [{week:"1"},
{week:"2"},
{week:"3"},
{week:"4"},
{week:"5"},
{week:"6"},
{week:"7"},
{week:"8"},
{week:"9"},
{week:"10"},
{week:"11"},
{week:"12"},
{week:"13"}]

let bb = [
    {week:"2",tongbi:"234"},
    {week:"5",tongbi:"54"}];

const composeData = (target,source) => {
    return target.map(item => {
        const findItem = source.find(el => el.week === item.week);//识别week值是否相等，如相等，findItem等于当前el
　　　　　return findItem || Object.assign(item,{tongbi:'0'}) 

  
　　}) 
} 
console.log(composeData(arr,bb))



  
 
   

    // 目标
   
 
   

    // [{week:"1",tongbi:"0"},
   
 
   

    // {week:"2",tongbi:"234"},
   
 
   

    // {week:"3",tongbi:"0"},
   
 
   

    // {week:"4",tongbi:"0"},
   
 
   

    // {week:"5",tongbi:"54"},
   
 
   

    // {week:"6",tongbi:"0"},
   
 
   

    // {week:"7",tongbi:"0"},
   
 
   

    // {week:"8",tongbi:"0"},
   
 
   

    // {week:"9",tongbi:"0"},
   
 
   

    // {week:"10",tongbi:"0"},
   
 
   

    // {week:"11",tongbi:"0"},
   
 
   

    // {week:"12",tongbi:"0"},
   
 
   

    // {week:"13",tongbi:"0"}]
   
 
  
 
  
 

 
 

版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。
 如何将多个数组合并为一个数组：
 1、按照多个数组的大小重新定义一个新的数组，使用循环将旧数组的值写入新数组：
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim byteA() As Byte = {1, 2, 3}
        Dim byteB() As Byte = {4, 5}
        Dim byteC() As Byte = {6, 7, 8, 9, 10}

        Dim byteall() As Byte
        ReDim byteall(byteA.Length + byteB.Length + byteC.Length - 1)
        For i As Integer = 0 To byteall.Length - 1
            If i < byteA.Length Then
                byteall(i) = byteA(i)
            End If
            If (i >= byteA.Length) And (i < byteA.Length + byteB.Length) Then
                byteall(i) = byteB(i - byteA.Length)
            End If
            If i >= byteA.Length + byteB.Length Then
                byteall(i) = byteC(i - byteB.Length - byteA.Length)
            End If
        Next

        For Each i As Byte In byteall
            Console.WriteLine(i & ControlChars.CrLf)
        Next
    End Sub
 
2、使用 Array.Copy 将旧数组的值拷贝到新数组：
 
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim byteA() As Byte = {1, 2, 3}
        Dim byteB() As Byte = {4, 5}
        Dim byteC() As Byte = {6, 7, 8, 9, 10}

        Dim byteall() As Byte
        ReDim byteall(byteA.Length + byteB.Length + byteC.Length - 1)
        Array.Copy(byteA, byteall, byteA.Length)
        Array.Copy(byteB, 0, byteall, byteA.Length, byteB.Length)
        Array.Copy(byteC, 0, byteall, byteA.Length + byteB.Length, byteC.Length)

        For Each i As Byte In byteall
            Console.WriteLine(i & ControlChars.CrLf)
        Next
    End Sub
 
由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。
 
学习更多vb.net知识，请参看vb.net 教程 目录

 

 

  
 
 
大家好，今日继续讲VBA数组与字典解决方案的第27讲，内容是两列数据中相互去掉重复值之后将数据合并。这讲的内容利用到动态数组，固定数组，数组的合并，数组的转置等等。
 
还是先看实例,下面的工作表中A列和B列有两列数值如下:
 

 

  
 
 
我们首先要在A列中去掉B列的重复值，然后在B列中去掉和A列重复的值，然后将剩余的A,B列数合并到C列。这个问题在理论上的应用较多，实际工作中要结合具体的应用来解析。如何实现呢？我们看下面的代码：
 
Sub MyNZsz_27() '第27讲 两列数中去掉相互重复值后合并"
 
 Sheets("27").Select
 
 Dim temvarArr1(), temvarArr2(), tem()
 
 varArr1 = Range("A1:A" & Range("A1").End(xlDown).Row) '将A列数据写入数组
 
 varArr2 = Range("B1:B" & Range("B1").End(xlDown).Row) '将B列数据写入数组
 
 ReDim temvarArr1(1 To UBound(varArr1)) '将A列数据写入动态一维数组
 
 For i = 1 To UBound(varArr1)
 
 temvarArr1(i) = varArr1(i, 1)
 
 Next
 
 ReDim temvarArr2(1 To UBound(varArr2)) '将B列数据写入动态一维数组
 
 For i = 1 To UBound(varArr2)
 
 temvarArr2(i) = varArr2(i, 1)
 
 Next
 
 '在数据1中去掉数据2的值，结果赋值给tem1
 
 tem1 = Filter(temvarArr1, temvarArr2(1), False) '给TEM1赋初始值，返回temvarArr1中不含temvarArr2(1)的值
 
 For i = 2 To UBound(temvarArr2)
 
 tem1 = Filter(tem1, temvarArr2(i), False)
 
 Next i
 
 '在数据2中去掉数据1的值，结果赋值给tem2
 
 tem2 = Filter(temvarArr2, temvarArr1(1), False) '给TEM2赋初始值
 
 For i = 2 To UBound(varArr1)
 
 tem2 = Filter(tem2, temvarArr1(i), False)
 
 Next i
 
 ReDim tem(0 To UBound(tem1) + UBound(tem2) + 1)
 
 For i = 0 To UBound(tem1)
 
 tem(i) = tem1(i)
 
 Next
 
 For i = UBound(tem1) + 1 To UBound(tem1) + UBound(tem2) + 1
 
 tem(i) = tem2(i - UBound(tem1) - 1)
 
 Next
 
 ' MsgBox Join(tem) '如果需要提示用户用此代码
 
 Range("C1") = "两列数中去掉相互重复值后合并"
 
 [c2].Resize(UBound(tem) + 1) = WorksheetFunction.Transpose(tem)
 
End Sub
 
代码截图：
 

 

  
 
 

代码解析：
 
1 整个 代码的过程先讲A和B列的数写入数组，然后转成一个一维数组，并分别去除重复值，得到TEM1和TEM2两个数组。最后将两个数组合并。
 
2 ReDim tem(0 To UBound(tem1) + UBound(tem2) + 1) 此处给动态数组以上下界的定义
 
3 For i = 0 To UBound(tem1)
 
 tem(i) = tem1(i)
 
 Next
 
 For i = UBound(tem1) + 1 To UBound(tem1) + UBound(tem2) + 1
 
 tem(i) = tem2(i - UBound(tem1) - 1)
 
 Next
 
 上述代码中分别有循环语句给给TEM数组赋值。
 
最后我们看输出的结果：
 

 

  
 
 
今日内容回向：
 
1 上述代码的过程是否理解呢？
 
2 上述过程中有哪些是动态数组？哪些是固定数组呢？