刚学sas，用循环搞了个极其麻烦的做法………………

data temp;
infile 'D:\sas学习\exp.txt';
length a $30.;
input a $;
do i=1 to 5;
b=scan(a,i,'[]');
if b ^= ',' then
output;
end;
run;

data temp1(keep=x1-x5);
set temp;
array c(5)$5. x1-x5;
if substr(b,length(b),1)=',' then c(5)=.;
else c(5)=substr(b,length(b),1);
j=1;
do while (j<=4);
i=1;
do while( i<=length(b));
   if substr(b,i,1)=',' then do;
     if i=1 then do; c(j)=.; j=j+1; end;
         else if substr(b,i,1)=','&        substr(b,i-1,1)=',' then do; c(j)=.; j=j+1; end;
         else do; c(j)=substr(b,i-1,1); j=j+1; end;
   end;
   i=i+1;
end;
end;
output;
run;

这，真能解决长达1.5MB不换行的数据读入问题？{:3_48:}

嗯，很巧妙，但确实是批量文件（锤地啊）

不好意思……没看你后面补充…………嘿嘿………………

中大的，08届的？

不是…我是09的~

冒号大概意思就是 遇到分隔符就读取完了 不会把分隔符读进去  好像是这样的吧

问错了，你09年毕业的？

…………………………我……是09级的……现在读大四…………………………

不错，刚大四就知道用SAS编编程，努力啊！

哈哈，感到sas很有用啊！！您也是中大的吗？是多少届的呀？