主题：求助 如何替换某列的字符

 请教老师，这段代码如何读懂？ EvalFor(GridName,"姓名1","Eval(Rept(""Substitute("",26) + """""""" + Upper([姓名]) + """""","""""" + Substitute(""A|B|C|D|E|F|G|H|I|J|K|L|M|N|O|P|Q|R|S|T|U|V|W|S|Y|Z"",""|"","""""",""""""""),"""""") + """""","""""""")"")") And CreateGrid(".","电话",0) And AddRows(".",Len(ListFor("表1","电话",1))-Len(Substitute(ListFor("表1","电话",1),"|",""))) And EvalFor(".","电话","Eval(""Split(""""""+ListFor(""表1"",""电话"",1)+"""""",""""|"""",Row)"")") And EvalFor(".","电话","Substitute(Substitute(Substitute(Substitute(Substitute(Substitute(Substitute(Substitute(Substitute(Substitute(Substitute([电话],""1"",""""),""2"",""""),""3"",""""),""4"",""""),""5"",""""),""6"",""""),""7"",""""),""8"",""""),""9"",""""),""0"",""""),""p"","""")") And DelFor(".","电话","=","") And EvalFor("表1","电话1","Substitute(Eval(Rept(""Substitute("",[.!Rows])+""[电话],""""""+Substitute(ListFor(""."",""电话"",2),""|"","""""",""""""""),"""""")+"""""","""""""")""),""|"","","")") And RemoveGrid(".")

想当年想考政治经济学研究生，里头就要求“高等代数”，对我这个文科生来说，难度太大，就放弃了。。。