例: ビュー プロパティにアクセスする

' 最上位の ClearCase アプリケーション オブジェクトに接続します。
Dim CC As New ClearCase.Application
Dim View as CCView

' ビュー タグからビューを取得します。
Set View = cc.View("carol_main")

' 表示のために、ビューのプロパティを集めます。
Dim strSnapShot As String
Dim strActive As String
If View.IsSnapShot Then
     strSnapShot = "Snapshot"
Else
     strSnapShot = "Dynamic"
End If

If View.IsActive Then
     strActive = "active"
Else
     strActive = "not active"
End If

' いくつかのビュー プロパティを表示します。
MsgBox strSnapShot & "View " & View.TagName & " on " & View.Host & _
     " is " & strActive & " and has config spec: " & vbCrLf & View.ConfigSpec