/Visual Studio 2008/CSDllCOMServer/CSDllCOMClient.vbs

# · Visual Basic · 15 lines · 7 code · 5 blank · 3 comment · 0 complexity · db8a389a41487d9292ebaaa8e8f9cea7 MD5 · raw file

  1. SET obj = CreateObject("CSDllCOMServer.SimpleObject")
  2. MsgBox "A CSDllCOMServer.SimpleObject object is created"
  3. ' Call the HelloWorld method that returns a string
  4. MsgBox "The HelloWorld method returns " & obj.HelloWorld
  5. ' Set the FloatProperty property
  6. MsgBox "Set the FloatProperty property to 1.2"
  7. obj.FloatProperty = 1.2
  8. ' Get the FloatProperty property
  9. MsgBox "The FloatProperty property returns " & obj.FloatProperty
  10. SET obj = Nothing