hyfm.net
当前位置:首页 >> vBs交换两个二维数组的值 >>

vBs交换两个二维数组的值

Dim a(2,2),ta(1,1)=15a(1,2)=16t=a(1,1):a(1,1)=a(1,2):a(1,2)=t MsgBox a(1,1) & vbCrLf & a(1,2)

引入第三个二维数组做中间介质传递变量.

for i=0 to 4 for j=0 to 4 t=a(i,j) a(i,j)=b(i,j) b(i,j)=t next j,i

再加一个中间数组c(4,4) 让 c:=a; a:=b; b:=c; 交换就完成了

设置一个中间变量,先把第一个值给中间变量,然后把第二个值给第一个值,最后把中间变量的给第二个值,这样就交换了.

Dim a, b, temp As Integera = 3b = 4temp = aa = bb=temp

memset(temp,0,10); memcpy(temp,&arr[1],10); memset(&arr[1],0,10); memcpy(&arr[1],&arr[2],10); memset(&arr[2],0,10); memcpy(&arr[2],temp,10);

#include <stdio.h>#define swap(a,b) {{(a)+=(b);}{(b)=(a)-(b);}{(a)=(a)-(b);}}/*定义了用于交换整数的宏*/int n,m;//两个数组的行数、列数int a[100][100],b[100][100];main(){int i,j;puts("输入二维数组的行数和列数");scanf("%d%d",&n,&m);

用一个变量,如交换a和b,加一个t.. t=a;a=b;b=t; 就交换好了

如果这两个数组大小相同且数据类型相同 请重新定义一个 两列二维数组 然后用循环把原值写进去

网站首页 | 网站地图
All rights reserved Powered by www.hyfm.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com