Rexx —— 字符

此函数返回 1 或文件本身中剩余可读字符数。文件名作为函数的参数提及。

语法

chars(filename)  

参数

• filename - 这是需要确定其文件结束的文件的名称。

返回值

此函数返回 1 或文件本身中剩余可读字符数。

示例

/* Main program */ 
str = '' 
do j = 1 while chars(Example.txt) > 0 
   str = ' ' (charin(Example.txt)) 
   call charout ,str 
end  

例如：`Rexx_file_eof.rexx`——

• 上述程序中需要注意以下事项 -

• 首先，一个字符串变量被分配为一个空值。

• 然后使用“do loop”一次读取一个字符。

每个字符被读取并发送到控制台。

当我们运行上面的程序时，将得到以下结果。

E x a m p l e 1 
E x a m p l e 2 
E x a m p l e 3