asc( ) 函数示例

下面的示例显示从 a 到 j 的字符, 并用 asc( ) 函数显示相应的 ansi 值。

store 'abcdefghij' to gcansi && 10 个字符
clear
for ncount = 1 to 10
? substr(gcansi, ncount,1) && 显示一个字符
?? asc(substr(gcansi, ncount)) && 显示 ansi 值
endfor