LOTUSSCRIPT 言語

例:IsObject 関数
' Define two classes, Vegetable and Fruit.
Class Vegetable
  ' ... class definition
End Class
Class Fruit
  ' ... class definition
End Class

Dim tomato As Variant, turnip As Variant
Print IsObject(tomato)          ' Output:False
Set turnip = New Vegetable
Print IsObject(turnip)          ' Output:True
Set tomato = New Fruit
Print IsObject(tomato)          ' Output:True

関連項目