Date: File:System_VBSc_8.1 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Гибкость

Date: File:System_VBSc_8.2 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Использование стандартных программ

Date: File:System_VBSc_8.3 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Обзор VBScript Переменные Они могут быть переменными ProTool или внутренними (локальными) переменными VBScript Локальные переменные VBScript (вводятся оператором Dim, тип переменной согласуется динамически) Константы VBScript (числовые и строковые) Операторы VBScript (+, -, *, /, \, =,, And, Or,.....) Условные операторы VBScript (If...Then...Else, Select Case) Циклы VBScript (Do...Loop, While... Wend, For...Next, For Each...Next) Процедуры VBScript (Sub, Function) Встроенные процедуры VBScript (Date, Sin, Sqr,...)

Date: File:System_VBSc_8.4 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Стандартные типы Формат Тип данныхID 8 битов со знакомCHAR, CHAR_ARRAY 8 битов без знака BYTE, BYTE_ARRAY 16 битов со знаком INT, INT_ARRAY% 16 битов без знака UINT, UINT_ARRAY 32 битов со знаком LONGINT, LONGINT_ARRAY& 32 бита, плавающая точкаFLOAT, FLOAT_ARRAY! 64 бита, плавающая точка DOUBLE, DOUBLE_ARRAY 1 битBOOL, BOOL_ARRAY Строки символовSTRING$

Date: File:System_VBSc_8.5 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Процедуры В VBScript используются различные типы процедур: Sub (подпрограммы) не имеют возвращаемого значения. Подпрограммы Sub имеют следующий синтаксис : Sub имя процедуры (аргументы) Операторы (они могут содержать константы, переменные или выражения или пустую пару скобок () ). End-Sub При каждом вызове процедуры выполняются операторы между Sub и End-Sub. Процедуры Function имеют возвращаемое значение. Подпрограммы Function имеют следующий синтаксис: Function имя процедуры (аргументы)[тип PLC]: Celsius (degrees F) Операторы : Celsius = (degrees F – 32) x 5/9 End Function Как и Sub, Function - отдельная процедура, которая может содержать аргументы, выполнять инструкции и изменять значения аргументов. В отличие от Sub, Function может возвращать значение вызвавшей процедуре.

Date: File:System_VBSc_8.6 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Ограничения VBScript 1/2 Назначение символических имен Обработка нескольких сценариев

Date: File:System_VBSc_8.7 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Ограничения VBScript 2/2 Параметрам сценария значения не присваиваются

Date: File:System_VBSc_8.8 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Гибкость, обеспечиваемая VBScript (Сложение)

Date: File:System_VBSc_8.9 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Сценарии без параметров 1/3

Date: File:System_VBSc_8.10 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Сценарии без параметров 2/3

Date: File:System_VBSc_8.11 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Графика без параметров 3/3

Date: File:System_VBSc_8.12 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Сценарии с параметрами 1/3

Date: File:System_VBSc_8.13 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Сценарии с параметрами 2/3

Date: File:System_VBSc_8.14 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Графика с параметрами 3/3

Date: File:System_VBSc_8.15 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Гибкость, обеспечиваемая VBScript - Пример: квадратный корень 1/3

Date: File:System_VBSc_8.16 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Гибкость, обеспечиваемая VBScript - Пример: квадратный корень 2/3

Date: File:System_VBSc_8.17 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Гибкость, обеспечиваемая VBScript - Пример: квадратный корень 3/3

Date: File:System_VBSc_8.18 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Сценарии - Пример: Системное окно 1/3 Если ввод делается в автоматическом режиме, появляется окно системных сообщений

Date: File:System_VBSc_8.19 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Сценарии - Пример: Системное окно 2/3

Date: File:System_VBSc_8.20 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Сценарии - Пример: Системное окно 3/3

Date: File:System_VBSc_8.21 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Переходы Переход Примечание If условие Then операторы Условный переход. Пишется в одну строку. [Else операторы] If условие 1 Then Блочная структура. If...ElseIf...End If операторы Каждая строка должна заканчиваться Then [ElseIf условие 2 Then операторы Else выполняются, если ни одно из операторы условий If или ElseIf не выполняются. ElseIf условие 3 Then операторы.....] [Else операторы] End If Select Case выражение Блочная структура. Select Case/Case/ End Select Case выражение 1 Выражение может быть переменной или любым операторы выражением, которое сравнивается с выражениями, [Case выражение 2 предшествующим ключевым словам Case. операторы.....] [Case Else операторы] End Select

Date: File:System_VBSc_8.22 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives Циклы Оператор цикла Примечания For счетчик=начальное To конечное [Step шаг] Цикл со счетчиком For...Next, операторы Завершается оператором Exit For. [Exit For]Шаг = 1, если опущен оператор Step операторы Next [счетчик] Do [While|Until условие] Условный цикл Do While... Loop, операторы условие завершения - в начале цикла [Exit Do] операторы Loop Do Условный цикл Do...Loop While, операторы условие завершения - в конце цикла [Exit Do] statements Loop [While|Until условие] While условие Эквивалентен условному циклу операторы Do While... Loop Wend

Date: File:System_VBSc_8.23 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Сценарии - Пример: Вычисления с двумя операндами 1/3 Операнд 1 Операнд 2 VBScript

Date: File:System_VBSc_8.24 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Сценарии - Пример: Вычисления с двумя операндами 2/3

Date: File:System_VBSc_8.25 SIMATIC HMI Siemens AG All rights reserved. SITRAIN Training for Automation and Drives VBScript / Сценарии - Пример: Вычисления с двумя операндами 3/3 Operand 1 Operand 2 VBScript