例: エレメントがテキスト ファイルかどうかを判別する

' 最上位の Rational ClearCase アプリケーション オブジェクトに接続します。
Dim CC As New ClearCase.Application
Dim Elem As CCElement
Set Elem = CC.Element("m:¥carol_main¥caroltest¥testelem.c")
MsgBox Elem.ElementType ' will be "text_file" for text files