CreateObject Function

UNOрд╡рд╕реНрддреБ рд╕рд┐рд░реНрдЬрдирд╛ рдЧрд░реНрдиреБрд╣реЛрд╕реН

рдпреЛ рддрд░реАрдХрд╛рд▓реЗ рдкреНрд░рдХрд╛рд░рдХреЛ рдкрд░рд╛рдорд┐рд░рддрд┐рдХреЛ рд░реВрдкрдорд╛ рдкрд╛рд╕ рдЧрд░реЗрдХрд╛ рджреГрд╖реНрдЯрд╛рдиреНрддрд╣рд░реВ рд╕рд┐рд░реНрдЬрдирд╛ рдЧрд░реНрджрдЫ ред

Syntax:

oObj = CreateObject( type )

Example:


Type address
    Name1 As String
    City As String
End Type
 
Sub main
    myaddress = CreateObject("address")
    MsgBox IsObject(myaddress)
End Sub