{"id":1366,"date":"2019-03-25T17:34:47","date_gmt":"2019-03-25T20:34:47","guid":{"rendered":"http:\/\/xexeu.elipse.com.br\/pt\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/"},"modified":"2019-05-29T17:08:51","modified_gmt":"2019-05-29T20:08:51","slug":"basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution","status":"publish","type":"post","link":"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/","title":{"rendered":"Basic VBScript for Elipse E3: Lesson 9 – Adding Objects in Execution"},"content":{"rendered":"

AddObject(strClassName, bActivate)<\/span><\/span><\/p>\n

The AddObject() method adds a new object to the application.
\nstrClassName<\/span>: type of object that to be created.
\nbActivate<\/span>: indicates if the object will be activated after creation.<\/p>\n

When the object is activated, the links and the script become enabled. If the object is created with bActivate set to False, it can later be activated <\/span>by the Activate() method.<\/p>\n

Example:<\/p>\n

set rectangle = Screen.AddObject(“DrawRect”, True)<\/span>
rectangle.X = 200<\/span>
rectangle.Y = 200<\/span>
rectangle.ForegroundColor = vbRed<\/span><\/p>\n

With…End With<\/span><\/span><\/p>\n

Multiple properties of the same object can be changed by using With\u2026End With. The code runs faster because the object is referenced only once.<\/p>\n

Example:<\/p>\n

With Screen.Item(“Rectangle1”)\u00a0\u00a0\u00a0 <\/span>
\u00a0\u00a0\u00a0 .BackgroundColor = vbRed<\/span>
\u00a0\u00a0\u00a0 .BorderColor = vbBlack<\/span>
\u00a0\u00a0\u00a0 .Effect3D = 1<\/span>
\u00a0\u00a0\u00a0 .Visible = True<\/span>
End With<\/span><\/p>\n

TypeName(varname)<\/span><\/span><\/p>\n

Returns a String value containing information about a variable of data type.
\nThe type of the object may be seen on the list of properties:<\/p>\n

\"\"
\nFigure 14<\/span>\"\"
\nFigure 15<\/span><\/p>\n

\"\"
\nFigure 16<\/span><\/p>\n<\/div>\n

Example:<\/p>\n

set Tag = Application.GetObject(“Data.InternalTag1”)\u00a0\u00a0\u00a0 <\/span>
MsgBox TypeName(Tag)<\/span>
‘A message box will be displayed with the text “InternalTag”<\/span>
set Button = Screen.Item(“CommandButton1”)<\/span>
MsgBox TypeName(Button)<\/span>
‘A message box will be displayed with the text “CommandButton”<\/span><\/p>\n

Exercises:<\/span><\/p>\n

1. By clicking on screen, create a blue rectangle at the click position.
\n2. Create a button that creates an internal tag and a demo tag in Data folder in runtime.<\/span>
\n3. Link the rectangle’s color to the demo tag via scripts (table link), according to the following color table<\/span>:<\/p>\n\n\n\n\n\n\n\n
\u00a0Min<\/td>\n\u00a0Max<\/td>\n\u00a0Color<\/td>\n<\/tr>\n
\u00a00<\/td>\n\u00a025<\/td>\n\u00a0Green<\/td>\n<\/tr>\n
\u00a025<\/td>\n\u00a050<\/td>\n\u00a0Blue<\/td>\n<\/tr>\n
\u00a050<\/td>\n\u00a075<\/td>\n\u00a0Yellow<\/td>\n<\/tr>\n
\u00a075<\/td>\n\u00a0100<\/td>\n\u00a0Red<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n

 <\/p>\n

4. Create a ComboBox. It must display the name of all internal tags in the Data folder. The ComboBox can be updated via [Refresh] button. T<\/span>o differentiate between demo tag and internal tag, use the TypeName command.
\n5. By selecting a tag in the ComboBox, a setpoint must be created on screen and linked to the selected tag. Use X=0, and Y will vary according to the number of setpoints already created.<\/span>
\n6. By right-clicking on screen, a menu with the name of all the setpoints on screen should be listed. T<\/span>o find out if the object on screen is a setpoint, use TypeName command.
\n7. By selecting a setpoint on the screen’s menu, delete the object. Display a message asking for confirmation before deleting.<\/p>\n

Attachments:<\/h3>\n

Lesson9.zip<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"

Autor
\nPaula Pereira En\u00e9as<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_exactmetrics_skip_tracking":false,"_exactmetrics_sitenote_active":false,"_exactmetrics_sitenote_note":"","_exactmetrics_sitenote_category":0},"categories":[763],"tags":[],"yoast_head":"\nBasic VBScript for Elipse E3: Lesson 9 - Basic VBScript for Elipse E3: Lesson 9 - Adding Objects in Execution[:] - Elipse Knowledgebase<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/\" \/>\n<meta property=\"og:locale\" content=\"en_US\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Basic VBScript for Elipse E3: Lesson 9 - Adding Objects in Execution\" \/>\n<meta property=\"og:description\" content=\"Autor Paula Pereira En\u00e9as\" \/>\n<meta property=\"og:url\" content=\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/\" \/>\n<meta property=\"og:site_name\" content=\"Elipse Knowledgebase\" \/>\n<meta property=\"article:publisher\" content=\"http:\/\/www.facebook.com\/elipsesoftware\" \/>\n<meta property=\"article:published_time\" content=\"2019-03-25T20:34:47+00:00\" \/>\n<meta property=\"article:modified_time\" content=\"2019-05-29T20:08:51+00:00\" \/>\n<meta property=\"og:image\" content=\"http:\/\/kb.elipse.com.br\/pt-br\/images\/ID2116\/fig_014.bmp\" \/>\n<meta name=\"author\" content=\"Elipse Software\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"Elipse Software\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"4 minutes\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/#article\",\"isPartOf\":{\"@id\":\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/\"},\"author\":{\"name\":\"Elipse Software\",\"@id\":\"https:\/\/kb.elipse.com.br\/#\/schema\/person\/def69ea453ea60b250497b89225a9f87\"},\"headline\":\"Basic VBScript for Elipse E3: Lesson 9 – Adding Objects in Execution\",\"datePublished\":\"2019-03-25T20:34:47+00:00\",\"dateModified\":\"2019-05-29T20:08:51+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/\"},\"wordCount\":756,\"commentCount\":0,\"publisher\":{\"@id\":\"https:\/\/kb.elipse.com.br\/#organization\"},\"articleSection\":[\"Scripts\"],\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/\",\"url\":\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/\",\"name\":\"[:pt]Basic VBScript for Elipse E3: Lesson 9 - Adding Objects in Execution[:en]Basic VBScript for Elipse E3: Lesson 9 - Adding Objects in Execution[:] - Elipse Knowledgebase\",\"isPartOf\":{\"@id\":\"https:\/\/kb.elipse.com.br\/#website\"},\"datePublished\":\"2019-03-25T20:34:47+00:00\",\"dateModified\":\"2019-05-29T20:08:51+00:00\",\"breadcrumb\":{\"@id\":\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/#breadcrumb\"},\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"In\u00edcio\",\"item\":\"https:\/\/kb.elipse.com.br\/en\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Basic VBScript for Elipse E3: Lesson 9 – Adding Objects in Execution\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/kb.elipse.com.br\/#website\",\"url\":\"https:\/\/kb.elipse.com.br\/\",\"name\":\"Elipse Knowledgebase\",\"description\":\"\",\"publisher\":{\"@id\":\"https:\/\/kb.elipse.com.br\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/kb.elipse.com.br\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"en-US\"},{\"@type\":\"Organization\",\"@id\":\"https:\/\/kb.elipse.com.br\/#organization\",\"name\":\"Elipse Software\",\"url\":\"https:\/\/kb.elipse.com.br\/\",\"sameAs\":[\"http:\/\/www.facebook.com\/elipsesoftware\"],\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/kb.elipse.com.br\/#\/schema\/logo\/image\/\",\"url\":\"https:\/\/kb.elipse.com.br\/wp-content\/uploads\/2019\/05\/schererelipse-com-br\/logoElipse.png\",\"contentUrl\":\"https:\/\/kb.elipse.com.br\/wp-content\/uploads\/2019\/05\/schererelipse-com-br\/logoElipse.png\",\"width\":161,\"height\":58,\"caption\":\"Elipse Software\"},\"image\":{\"@id\":\"https:\/\/kb.elipse.com.br\/#\/schema\/logo\/image\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\/\/kb.elipse.com.br\/#\/schema\/person\/def69ea453ea60b250497b89225a9f87\",\"name\":\"Elipse Software\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/kb.elipse.com.br\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/secure.gravatar.com\/avatar\/ff1f7ec38f4687b06f6851d97b3cd2d0?s=96&d=mm&r=g\",\"contentUrl\":\"https:\/\/secure.gravatar.com\/avatar\/ff1f7ec38f4687b06f6851d97b3cd2d0?s=96&d=mm&r=g\",\"caption\":\"Elipse Software\"},\"url\":\"https:\/\/kb.elipse.com.br\/en\/author\/webmasterelipse-com-br\/\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"Basic VBScript for Elipse E3: Lesson 9 - Basic VBScript for Elipse E3: Lesson 9 - Adding Objects in Execution[:] - Elipse Knowledgebase","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/","og_locale":"en_US","og_type":"article","og_title":"[:pt]Basic VBScript for Elipse E3: Lesson 9 - Adding Objects in Execution[:en]Basic VBScript for Elipse E3: Lesson 9 - Adding Objects in Execution[:] - Elipse Knowledgebase","og_description":"[:pt]Autor Paula Pereira En\u00e9as[:en]Autor Paula Pereira En\u00e9as[:]","og_url":"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/","og_site_name":"Elipse Knowledgebase","article_publisher":"http:\/\/www.facebook.com\/elipsesoftware","article_published_time":"2019-03-25T20:34:47+00:00","article_modified_time":"2019-05-29T20:08:51+00:00","og_image":[{"url":"http:\/\/kb.elipse.com.br\/pt-br\/images\/ID2116\/fig_014.bmp"}],"author":"Elipse Software","twitter_card":"summary_large_image","twitter_misc":{"Written by":"Elipse Software","Est. reading time":"4 minutes"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/#article","isPartOf":{"@id":"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/"},"author":{"name":"Elipse Software","@id":"https:\/\/kb.elipse.com.br\/#\/schema\/person\/def69ea453ea60b250497b89225a9f87"},"headline":"Basic VBScript for Elipse E3: Lesson 9 – Adding Objects in Execution","datePublished":"2019-03-25T20:34:47+00:00","dateModified":"2019-05-29T20:08:51+00:00","mainEntityOfPage":{"@id":"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/"},"wordCount":756,"commentCount":0,"publisher":{"@id":"https:\/\/kb.elipse.com.br\/#organization"},"articleSection":["Scripts"],"inLanguage":"en-US","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/","url":"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/","name":"[:pt]Basic VBScript for Elipse E3: Lesson 9 - Adding Objects in Execution[:en]Basic VBScript for Elipse E3: Lesson 9 - Adding Objects in Execution[:] - Elipse Knowledgebase","isPartOf":{"@id":"https:\/\/kb.elipse.com.br\/#website"},"datePublished":"2019-03-25T20:34:47+00:00","dateModified":"2019-05-29T20:08:51+00:00","breadcrumb":{"@id":"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/#breadcrumb"},"inLanguage":"en-US","potentialAction":[{"@type":"ReadAction","target":["https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/kb.elipse.com.br\/en\/basic-vbscript-for-elipse-e3-lesson-9-adding-objects-in-execution\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"In\u00edcio","item":"https:\/\/kb.elipse.com.br\/en\/"},{"@type":"ListItem","position":2,"name":"Basic VBScript for Elipse E3: Lesson 9 – Adding Objects in Execution"}]},{"@type":"WebSite","@id":"https:\/\/kb.elipse.com.br\/#website","url":"https:\/\/kb.elipse.com.br\/","name":"Elipse Knowledgebase","description":"","publisher":{"@id":"https:\/\/kb.elipse.com.br\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/kb.elipse.com.br\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"en-US"},{"@type":"Organization","@id":"https:\/\/kb.elipse.com.br\/#organization","name":"Elipse Software","url":"https:\/\/kb.elipse.com.br\/","sameAs":["http:\/\/www.facebook.com\/elipsesoftware"],"logo":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/kb.elipse.com.br\/#\/schema\/logo\/image\/","url":"https:\/\/kb.elipse.com.br\/wp-content\/uploads\/2019\/05\/schererelipse-com-br\/logoElipse.png","contentUrl":"https:\/\/kb.elipse.com.br\/wp-content\/uploads\/2019\/05\/schererelipse-com-br\/logoElipse.png","width":161,"height":58,"caption":"Elipse Software"},"image":{"@id":"https:\/\/kb.elipse.com.br\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/kb.elipse.com.br\/#\/schema\/person\/def69ea453ea60b250497b89225a9f87","name":"Elipse Software","image":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/kb.elipse.com.br\/#\/schema\/person\/image\/","url":"https:\/\/secure.gravatar.com\/avatar\/ff1f7ec38f4687b06f6851d97b3cd2d0?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/ff1f7ec38f4687b06f6851d97b3cd2d0?s=96&d=mm&r=g","caption":"Elipse Software"},"url":"https:\/\/kb.elipse.com.br\/en\/author\/webmasterelipse-com-br\/"}]}},"_links":{"self":[{"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/posts\/1366"}],"collection":[{"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/comments?post=1366"}],"version-history":[{"count":3,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/posts\/1366\/revisions"}],"predecessor-version":[{"id":6746,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/posts\/1366\/revisions\/6746"}],"wp:attachment":[{"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/media?parent=1366"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/categories?post=1366"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/tags?post=1366"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}