Rexx-chars

提供:Dev Guides
移動先:案内検索

Rexx-文字

この関数は、1またはファイル自体で読み取るために残っている文字数を返します。 ファイル名は、関数のパラメーターとして記載されています。

構文

chars(filename)

パラメーター

  • ファイル名-これは、ファイルの終わりを決定する必要があるファイルの名前です。

戻り値

この関数は、1またはファイル自体で読み取るために残っている文字数を返します。

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

上記のプログラムについては、次のことに注意する必要があります-

  • 最初に、文字列変数がnull値に割り当てられます。
  • 次に、「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