VB
Asc(Chr(148))=0
AscB(ChrB(148))=148
AscW(ChrW(148))=148
怎样才能
函数(Chr(148))=148