PC-DMIS Help Center - 2020 R1

Click here to see this page in full context

Example:

1. Sub Main

   1. Dim MyInt As Integer, MyCheck

      Dim MyObject As Object

      Dim YourObject As Object

      Set MyObject = CreateObject("Word.Basic")

      Set YourObject = MyObject

      MyCheck = IsObject(YourObject)

      Print MyCheck

   End Sub