The user's guide

  1. The description
    Each of the frames of this document is created with the help by last version of the designer "Michael" and demonstrates opportunities of the designer.
  2. Purpose
    This operative help on VBS is intended for application and study of language of the scripts VBS. The application of language is carried out by an insert of fragments of language and examples in the text of the edited script and illustrative performance of examples. For study of language the elements of language, fragments, examples and comment are given.
  3. The order of application
  4. The tag SCRIPT
    All texts of the scripts should be inside this script, if you work in a window of editing of "head" or scripts of object "HTML". Thus the insert of the scripts - codes in the text SCRIPT is carried out automatically.
    The texts of the scripts of processing of events can be in scripts.
    Examples of the tag:
    <SCRIPT LANGUAGE=VBSCRIPT>
    <!--
     '   The scripts in VBS here are placed.
     -->
    </SCRIPT>
    <SCRIPT LANGUAGE=VBS>
    <!--
     '   The scripts in VBS here are placed.
     -->
    </SCRIPT>
  5. PROCEDURES VBS:
    By word "Rem" the comments in the texts of examples begin.
  6. Procedures ~ functions VBS
    It is the programs which are carrying out certain actions, and called repeatedly from various parts of the different scripts, by transfer of initial parameters and return of value.
  7. Procedures ~ subroutines VBS
    It is the programs the carrying out certain actions and called repeatedly from various parts of the different scripts.
  8. Rules for names of variable
  9. Types of the data
    In VBS there is only one type of the data - variant. There are following subtypes of variant:
  10. Assigning Values to Variables
    Name_variable = value.
    Dev1=1234.56
    Dev2="1123"
    Dev3=False
  11. Assignment and removal of the reference
    The reference is the index on object, with which help the access to properties, methods and collections of objects is carried out. Details look " The operative help on HTML ".
  12. Scope
    All variable, which are defined obviously (Dim) or implicitly (without Dim, assignment of value), outside of the subroutines, or functions are global.
    Variable, which do not coincide on a name with global and are defined obviously, or is implicit, inside the subroutine or the functions work only inside them.
  13. Arrays
  14. CONSTANTS:
  15. Constants of system colours
  16. Constants of comparison
  17. Constants of date and time
  18. Constants of formats of date and time
  19. Textual constants
  20. Constants logic
  21. Constants of a subtype variable
    The subtype of a constant can be learned by the following function:
    VarType("It is textual variable, constant of a kind=vbString or 8.")
  22. The arithmetic operators
  23. The operators of comparison
    The list of the operators of comparison and condition, with which the result has value: true,false,null
    operators True False Null
    <, less x<y x>=y x or y=Null
    <=, less or equal x<=y x>y x or y=Null
    >, more x>y x<=y x or y=Null
    >=, more or equal x>=y x<y x or y=Null
    =, equal x=y x<>y x or y=Null
    <>, not equally x<>y x=y x or y=Null
    THE RECOMMENDATION: With an insert of the script - code in object HTML, in the tag SCRIPT, do not use the operators of comparison < and >, in exchange use and <= and >=. It will allow an insert to work correctly.
  24. The operator of merge of the texts
    & - is used for merge of two textual expressions.
    msgbox "Hello !"&"Mr. X"
  25. THE MANAGING OPERATORS:
  26. THE OPERATORS OF BRANCHING:
  27. If,,,Then
    if condition then operators,
    If a condition "true" to execute "operators", if is "false" nothing to do.
    EXAMPLE 1 - to print the message, applying the operator in one line:
    If true Then Msgbox "In one line"
    EXAMPLE 2 - to print the message, applying the operator in some line:
    If true Then
    Msgbox "In some lines"
    End if
  28. If,,,Then,,,Else
    if condition then
    operators_1
    else
    operators_2
    end if
    ,
    If the condition is true that to execute "operators _ 1 ", if the condition is false to execute "operators _ 2 ".
    EXAMPLE - variable to give a logic kind, if value of variable is true, to give out "The expression is true ",otherwise to give out "The expression is false":
    dev1=3>=5
    If dev1 then
    msgbox "The expression is true"
    else
    msgbox "The expression is false"
    end if
  29. If,,,Then,,,ElseIf
    if condition_1 then
    operators_1
    elseif condition_2 then
    operators_1
    elseif condition_3 then
    operators_1
    ...
    else
    operators_N
    end if
    ,
    If "condition_1" is true, that to execute "operators_1", if "condition_1 " is false to check up "condition _ 2". If "condition_2" is true to execute "operators_2", if "condition_2" false, to check up "condition_3", and so on. If any of conditions not "true" to execute "operators_N"
    EXAMPLE - variable to give value, to analyse value on entry in intervals and >= 10, and < = 7 and to give out result of the analysis:
    dev1=5
    If dev1>=10 then
    msgbox "dev1>=10"
    elseif  dev1<=7 Then
    msgbox "dev1<=7"
    else
    msgbox "Any condition is not executed"
    end if
  30. Select Case
    Select case condition DEVY
    case expression1
    operators_1
    case expression2,expression3
    operators_2
    ...
    case else
    operators_N
    end select
    ,
    The value of expression DEVY is calculated, for an explanation we shall name this value ZDEVY. ZDEVY is compared to value "expression1", if they are equal, the "operators_1" are carried out and the work comes to an end. If not are equal that, is compared to values "expression2" and "expression3". If ZDEVY is equal to one of compared values, the "operators_2" are carried out and the work comes to an end, if not are equal, the comparisons ZDEVY with one, or several values of expressions in the following line and so on are carried out. If ZDEVY was not compared to one value of expression in the subsequent lines case, the "operators_N" are carried out and the work comes to an end,
    EXAMPLE - to analyze value of variable and to give out the different messages with performance of the following conditions: value of variable = 1; value of variable = 2 or 3; value of variable not equally 1, 2, 3:
    dev1=1
    Select Case dev1
    Case 1
    msgbox "Value of variable equally 1"
    Case 2,3
    msgbox "Value of variable equally 2 or 3"
    Case Else
    msgbox "Value of variable anyone except 1 or 2 or 3."
    End Select
  31. THE OPERATORS OF CYCLES:
  32. Do While,,,Loop
    do while condition
    operators
    loop
    ,
    To carry out the operators while "condition" has value "true", if the condition has value "false", the cycle can not be executed of any time. The operands determining a condition, should change in a cycle so, that there was a correct exit from a cycle, differently case the infinite cycle will be organized. If the script is carried out suspiciously long, one of the reasons it is the organization of an infinite cycle. In this case , finish work by pressing ALT + CTRL + DEL, start the designer, analyse carried out cycles, insert additional debugging conditions of an exit from a cycle.
    EXAMPLE - to execute a cycle 3 times giving out the message with each performance:
    dev=1
    Do while dev<=3
    msgbox "Performance "&dev&", only performance 3."
    dev=dev+1
    Loop
  33. Do Until,,,Loop
    do until condition
    operators
    loop
    .
    To carry out "operators" while a condition will not become "true".
    If the condition has value "true", the cycle can not be executed of any time. The operands determining a condition, should change in a cycle so, that there was a correct exit from a cycle, differently case the infinite cycle will be organized. If the script is carried out suspiciously long, one of the reasons it is the organization of an infinite cycle. In this case , finish work by pressing ALT + CTRL + DEL, start the designer, analyse carried out cycles, insert additional debugging conditions of an exit from a cycle.
    EXAMPLE - to execute a cycle 3 times giving out the message with each performance:
    dev=1
    Do until dev>=4
    msgbox "Performance "&dev&", only performance 3."
    dev=dev+1
    Loop
  34. Do,,,Loop While
    do
    operators
    loop while condition
    .
    To execute "operators" to check up a condition and, if it has value "true" to execute "operators". Further to work so, while "condition" has value "true". The cycle will be executed as a minimum once. The operands determining a condition, should change in a cycle so, that there was a correct exit from a cycle, differently case the infinite cycle will be organized.If the script is carried out suspiciously long, one of the reasons it is the organization of an infinite cycle. In this case , finish work by pressing ALT + CTRL + DEL, start the designer, analyse carried out cycles, insert additional debugging conditions of an exit from a cycle.
    EXAMPLE - to execute a cycle 3 times giving out the message with each performance:
    dev=1
    Do
    msgbox "Performance "&dev&", only performance 3."
    dev=dev+1
    Loop While dev<=3
  35. Do,,,Loop Until
    do
    operators
    loop until condition
    .
    To execute "operators" to check up "condition" and, if it has value "false" to execute "operators". Further to work so, while "condition" has value "false".The cycle will be executed as a minimum once. The operands determining a condition, should change in a cycle so, that there was a correct exit from a cycle, differently case the infinite cycle will be organized.If the script is carried out suspiciously long, one of the reasons it is the organization of an infinite cycle. In this case , finish work by pressing ALT + CTRL + DEL, start the designer, analyse carried out cycles, insert additional debugging conditions of an exit from a cycle.
    EXAMPLE - to execute a cycle 3 times giving out the message with each performance:
    dev=1
    Do
    msgbox "Performance "&dev&", only performance 3."
    dev=dev+1
    Loop Until dev>=4
    As against DoWhile,,, Loop under any condition will be executed once.
  36. While,,,Wend
    while condition
    operators
    wend

    To carry out "operators" while "condition" has value "true".The operands determining a condition, should change in a cycle so, that there was a correct exit from a cycle, differently case the infinite cycle will be organized. If the script is carried out suspiciously long, one of the reasons it is the organization of an infinite cycle. In this case , finish work by pressing ALT + CTRL + DEL, start the designer, analyse carried out cycles, insert additional debugging conditions of an exit from a cycle.
    EXAMPLE - to execute a cycle 3 times giving out the message with each performance:
    dev=1
    While dev<=3
    msgbox "Performance "&dev&", only performance 3."
    dev=dev+1
    Wend
  37. For,,,Next
    FOR variable_cycle = initial_value TO final_value
    STEP step_changes_variable_cycle
    operators
    next
    .
    To carry out "operators" while "variable_cycle" the value will not reach "final_value". "Variable_cycle" the value up to "final_ alue" with a step "step_changes_variable_cycle" changes automatically from "initial_value".
    EXAMPLE - to execute a cycle 3 times giving out the message with each performance:
    for dev=1 to 3 step 1
    msgbox "Performance "&dev&", Only to execute 3 times."
    next
  38. For Each,,,Next
    FOR EACH  the reference _ on _ object  IN a collection
    operators
    next
    .
    For each object from a "collection" to execute the "operators".
    EXAMPLE - to see all objects "button" in the document and to show for each object its number and beginning of a html-code:
    Set dev=document.all.tags("BUTTON")
    For Each devi In dev
    msgbox "Object N "&devi.sourceindex&vbcr&" HTML-code: "&vbcr&left(devi.outerhtml,50)
    next
  39. FUNCTIONS VBS:
  40. FUNCTIONS OF ARRAY:
  41. LBound
    LBound(arrayname[, dimension]) - Returns the smallest available subscript for the indicated dimension of an array. Always returns 0.Arguments:
    • arrayname - Name of the array variable.
    • dimension - Whole number indicating which dimension's lower bound is returned. Use 1 for the first dimension, 2 for the second, and so on. If dimension is omitted, 1 is assumed.
  42. UBound
    UBound(arrayname[, dimension])-Returns the largest available subscript for the indicated dimension of an array. Arguments:
    • arrayname - name of the array variable.
    • dimension - Whole number indicating which dimension's upper bound is returned. Use 1 for the first dimension, 2 for the second, and so on. If dimension is omitted, 1 is assumed.
  43. FUNCTIONS OF TRANSFORMATION:
    Asc AscB AscW Chr ChrB
    ChrW CBool Cbyte CDbl Cint
    Clng CStr CSng Fix Hex
    Int Oct Sgn Round
  44. FUNCTIONS OF DATE AND TIME:
    Date DateAdd DateDiff DatePart
    DateSerial DateValue Day Hour
    Minute Month MonthName Now
    Second Time TimeSerial TimeValue
    Weekday WeekdayName
  45. MATHEMATICAL FUNCTIONS:
    Atn Cos Exp Log
    Randomize Rnd Sin Sqr
    Tan
  46. FUNCTIONS OF OBJECTS:
  47. CreateObject
    CreateObject(servername.typename [, location]) - Creates and returns a reference to an Automation object.
    Arguments: More in detail look http://msdn.microsoft.com ...
  48. GetObject
    GetObject([pathname] [, class]) - Returns a reference to an Automation object from a file.
    Arguments: More in detail look http://msdn.microsoft.com ...
  49. LoadPicture
    LoadPicture(picturename)
    Returns a picture object. Available only on 32-bit platforms. LoadPicture(picturename) The picturename argument is a string expression that indicates the name of the picture file to be loaded. More in detail look http://msdn.microsoft.com ...
  50. CODES OF THE ENGINE:
  51. TEXTUAL FUNCTIONS:
    Filter FormatCurrency FormatDateTime
    FormatNumber FormatPercent InStr,InStrB
    InStrRev Join Lcase
    Left LeftB Len
    LenB LTrim Mid
    MidB Replace Right
    RightB Space Split
    StrComp String StrReverse
    Trim Unescape Ucase
  52. Filter
    Filter(InputStrings, Value[, Include[, Compare]]) - Returns a zero-based array containing a subset of a string array based on a specified filter criteria.
    Arguments: If no matches of Value are found within InputStrings, Filter returns an empty array. An error occurs if InputStrings is Null or is not a one-dimensional array.
    The array returned by the Filter function contains only enough elements to contain the number of matched items.
    EXAMPLE - from string "1/2/3/4/5/abc/1" to create array by splitting it on a symbol "/". From the received array to generate other array, by including in it only elements value equal 1, to show result:
    devmas="1/2/3/4/5/abc/1"
    devmas1=split(devmas,"/")
    devmas2=filter(devmas1,1)
    msgbox join(devmas2)
  53. FormatCurrency
    FormatCurrency(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]]) - Returns an expression formatted as a currency value using the currency symbol defined in the system control panel.
    Arguments: When one or more optional arguments are omitted, values for omitted arguments are provided by the computer's regional settings. The position of the currency symbol relative to the currency value is determined by the system's regional settings.
    All settings information comes from the Regional Settings Currency tab, except leading zero, which comes from the Number tab.
    EXAMPLE - to show number in a money format:
    msgbox FormatCurrency(12.127)
  54. FormatDateTime
    FormatDateTime(Date[, NamedFormat]) - Returns an expression formatted as a date or time.
    Arguments: EXAMPLE - to show a string in a format of date:
    msgbox FormatDateTime(date())
  55. FormatNumber
    FormatNumber(Expression [,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]]) - Returns an expression formatted as a number.
    Arguments: When one or more of the optional arguments are omitted, the values for omitted arguments are provided by the computer's regional settings.
    All settings information comes from the Regional Settings Number tab.
    EXAMPLE - to show a string in a format of number:
    msgbox FormatNumber("123435,339")
  56. FormatPercent
    FormatPercent(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]]) - Returns an expression formatted as a percentage (multiplied by 100) with a trailing % character.
    Arguments: The IncludeLeadingDigit, UseParensForNegativeNumbers, and GroupDigits arguments have the following settings: When one or more optional arguments are omitted, the values for the omitted arguments are provided by the computer's regional settings.
    All settings information comes from the Regional Settings Number tab.
    EXAMPLE - to show number in a format of percents:
    msgbox Formatpercent(0.12)
  57. InStr,InStrB
    InStr([start, ]string1, string2[, compare]) - Returns the position of the first occurrence of one string within another.
    InStrB([start, ]string1, string2[, compare]) - Returns the byte position of the first occurrence of one string within another.
    All possible values of return look the table below.
    Returned value depending on a condition
    If InStrRev returns
    "string1" is zero-length 0
    "string1" is Null Null
    "string2" is zero-length start
    "string2" is Null Null
    "string2" is not found 0
    "string2" is found within
    "string1"
    Position at which match
    is found
    "start" >Len("string2") 0
    Arguments: EXAMPLE - to find a position "5" in a string "1234567890":
    msgbox Instr("1234567890","5")
    EXAMPLE - to find a position of byte "5" in a line "1234567890":
    msgbox InstrB("1234567890","5")
  58. InStrRev
    InStrRev(string1, string2[, start[, compare]]) - Returns the position of an occurrence of one string within another and other values, from the end of string. All possible values of return look the table below.
    Returned value depending on a condition
    If InStrRev returns
    "string1" is zero-length 0
    "string1" is Null Null
    "string2" is zero-length start
    "string2" is Null Null
    "string2" is not found 0
    "string2" is found within
    "string1"
    Position at which match
    is found
    start >Len("string2") 0
    Arguments: EXAMPLE - to find value of a position "9" in a string "0987654321" and to show result:
    msgbox InstrRev("1234567890","9")
  59. Join
    Join(list[, delimiter]) - Returns a string created by joining a number of substrings contained in an array. Arguments: EXAMPLE - to split a string "1/2/3/4/5" on a symbol "/" to join the received array, and to show result:
    devmas="1/2/3/4/5"
    devmas1=split(devmas,"/")
    msgbox join(devmas1)
  60. Lcase
    Lcase(string) - Transforms all symbols of a string to lower case symbols. The string argument is any valid string expression. If string contains Null, Null is returned.
    EXAMPLE - to transform upper case symbols of a line "HELLO"! In lower case and to show result:
    msgbox Lcase("HELLO !")
  61. Left
    Left(string, length) - Returns a specified number of characters from the left side of a string. Arguments: EXAMPLE - to receive from a string "abcde" a string from first three symbols and to show result:
    devleft=Left("abcde",3)
    msgbox devleft
  62. LeftB
    LeftB(string,length) - Returns a specified number of bytes from the left side of a string. Arguments: EXAMPLE - to transform number 12345678 to 16 system of calculation to show first four bytes and to show number in 16 systems:
    devleft1=hex(12345678)
    devleft2=leftb(devleft1,4)
    msgbox devleft2&"/"&devleft1
  63. Len
    Len(string | varname) - Returns the number of characters in a string or the number of characters required to store a variable. Arguments: EXAMPLE - to show number of symbols of a string "abcde":
    msgbox Len("abcde")
  64. LenB
    LenB(string | varname) - Returns the number of bytes in a string or the number of bytes required to store a variable. Arguments: EXAMPLE - to show number of bytes of a string "abcde":
    msgbox LenB("abcde")
  65. LTrim
    LTrim(string) - Returns a string without leading spaces (LTrim),. The string argument is any valid string expression. If string contains Null, Null is returned.
    EXAMPLE - to remove initial apaces of a line "abcde" and to show result:
    msgbox Ltrim(" abcde")
  66. Mid
    Mid(string, start[, length]) - Returns a specified number of characters from a string. Arguments: EXAMPLE - from a string "abcde" to take two symbols since third and to show result:
    msgbox Mid("abcde",3,2)
  67. MidB
    MidB(bytes, beginning, quantity) - Returns a specified number of bytes from a string. Arguments: EXAMPLE - from a string "abcde" to take four bytes since third and to show result:
    msgbox Midb("abcde",3,4)
  68. Replace
    Replace(expression, find, replacewith[, start[, count[, compare]]]) - Returns a string in which a specified substring has been replaced with another substring a specified number of times.
    All values which can be returned, depending on a condition:
    If Replace returns
    "expression" is zero-length Zero-length string ("").
    "expression" is Null An error.
    "find" is zero-length Copy of "expression".
    "replacewith" is zero-length Copy of "expression" with all
    occurrences of "find" removed.
    "start" > Len("expression") Zero-length string.
    "count" is 0 Copy of "expression".
    Arguments: The return value of the Replace function is a string, with substitutions made, that begins at the position specified by start and concludes at the end of the expression string. It is not a copy of the original string from start to finish.
    EXAMPLE - in a string "a/b/c/d/e" a symbol "/" to replace with a symbol "*" and to show result:
    msgbox Replace("a/b/c/d/e","/","*")
  69. Right
    Right(string, length) - Returns a specified number of characters from the right side of a string. Arguments: EXAMPLE - to receive from a string "abcde" a substring from last three symbols and to show result:
    devleft=right("abcde",3)
    msgbox devleft
  70. RightB
    RightB(string, length) - Returns a specified number of bytes from the right side of a string. Arguments: EXAMPLE - to transform number 12345678 to 16 system of calculation to show last four bytes and to show number in 16 systems:
    devleft1=hex(12345678)
    devleft2=rightb(devleft1,4)
    msgbox devleft2&"/"&devleft1
  71. RTrim
    RTrim(string) - Returns a string without trailing spaces. The string argument is any valid string expression. If string contains Null, Null is returned.
    EXAMPLE - to remove from a string "abcde" final spacess and to show result:
    msgbox rtrim("abcde ")
  72. Space
    Space(number) - Returns a string consisting of the specified number of spaces. The number argument is the number of spaces you want in the string.
    EXAMPLE - in a string "abcde" after the first symbol to add three spaces and to show result:
    msgbox "a"&space(3)&"bcde"
  73. Split
    Split(expression[, delimiter[, count[, compare]]]) - Returns a zero-based, one-dimensional array containing a specified number of substrings.
    Arguments: EXAMPLE - to split a string "1/2/3/4/5" on a symbol "/" , to join the received array, and to show result:
    devmas="1/2/3/4/5"
    devmas1=split(devmas,"/")
    msgbox join(devmas1)
  74. StrComp
    StrComp(string1, string2[, compare]) - Returns a value indicating the result of a string comparison.
    The table of returned value depending on a condition
    Value Condition
    0 if the string1 is equalled a string2
    -1 if the string1 is less than string2
    1 if the string1 is more than string2
    Null if the string1 or string2 has value Null
    Arguments: EXAMPLE - to compare identical strings and to show result of comparison:
    msgbox StrComp("abc","abc")
  75. String
    String(number, character) - Returns a repeating character string of the length specified. Arguments: If you specify a number for character greater than 255, String converts the number to a valid character code using Mod 256.
    EXAMPLE - to show a string from 10 symbols "*":
    msgbox String(10,"*")
  76. StrReverse
    StrReverse(string) - Returns a string in which the character order of a specified string is reversed. The string argument is the string whose characters are to be reversed. If string is a zero-length string (""), a zero-length string is returned. If string is Null, an error occurs.
    EXAMPLE - to show a string with changed on the opposite order of symbols "12345":
    msgbox StrReverse("12345")
  77. Trim
    Trim(string) - Returns a string without both leading and trailing spaces. The string argument is any valid string expression. If string contains Null, Null is returned.
    EXAMPLE - at a string of symbols " 12345 " to remove initial and final apaces and to show result:
    devtrim=trim( "  12345  ")
    msgbox devtrim&" Symbols="&len(devtrim)
  78. Unescape
    Unescape(charString) - Decodes a string encoded with the Escape function.
    The Unescape function returns a string (in Unicode format) that contains the contents of charString. ASCII character set equivalents replace all characters encoded with the %xx hexadecimal form. Characters encoded in %uxxxx format (Unicode characters) are replaced with the Unicode character with hexadecimal encoding xxxx.
  79. Ucase
    Ucase(string) - All symbols in a string replaces lower case symbols. If string contains Null, Null is returned.
    EXAMPLE - to transform lower case symbols of a line "hello!" in upper case symbols, and to show result:
    msgbox Ucase("hello!")
  80. FUNCTIONS OF CHECK VARIABLES:
    IsArray IsDate IsEmpty IsNull
    IsNumeric IsObject
  81. IsArray
    IsArray(name_of_variable) - Returns True, if variable, which name is specified in parameter, there is array, and False otherwise.
  82. IsDate
    IsDate(expression) - Returns True, if expression, which is specified in parameter, has a type of date and False otherwise.
  83. IsEmpty
    IsEmpty(expression) - Returns False, if expression, which is specified in parameter, has received value, and True otherwise.
  84. IsNull
    IsNull(expression) - Returns True, if expression, which is specified in parameter, has incorrect value, and False otherwise.
  85. IsNumeric
    IsNumeric(expression) - Returns True, if expression, which is specified in parameter, has a type of number, and False otherwise.
  86. IsObject
    IsObject(expression) - Returns True, if expression which is specified in parameter, has a type of object, and False otherwise.
  87. VarType
    VarType(name_of_variable) - Returns a subtype variable as number.
    For viewing numbers click:
    Constants of a subtype variable
  88. Definition of variables
    Dim dev1,dev2,dev3-defines obviously variables.
  89. Processing of errors
    EXAMPLE - to create a error by extraction of a root square of a negative number and to give out a code of a error:
    On Error Resume Next
    dev1=sqr(-2)
    if err<>0 then
    msgbox err
    end if
    The comment for example:
    line_1-to ignore error
    line_2-creation of error
    line_3-analysis a code of error and if error there is
    line_4-display of its code.
  90. INPUT~OUTPUT:
  91. msgbox
    Gives out the message and can return value, depending on that, what button was pressed(clicked).
  92. inputbox
    Enter the data and press the necessary button.
  93. Comment
    The text of the comment in VBS is the text beginning with symbols: ' or rem.
    NOTE: the comments in the scripts, which in tag are forbidden.
  94. Explicit definition variable
    Option Explicit
    For avoidance of errors with application variable it is recommended in the beginning of the script to enter this operand. Thus all variable before their application should be defined by an operand DIM.