እቃ መፍጠሪያ ተግባር

oእቃ = እቃ መፍጠሪያ( አይነት )

Type address

    Name1 As String

    City As String

End Type

Sub main

    myaddress = CreateObject("address")

    MsgBox IsObject(myaddress)

End Sub