parray->cbelements=sizeof(long);
hr=safearrayallocdata(parray);
long ldimension[2];
long x=1;
//为第一行赋值
for(long i=0;i<3;++i)
{
ldimension[1]=0;//行
ldimension[0]=i;//列
safearrayputelement(parray,ldimension,&x);
x++;
}
