最北端で暮らすSEのknowhow

GlobalScope.BasicLibraries.LoadLibrary("ScriptForge")
Dim service As Object
service = CreateScriptService("Array")
Dim arr As Variant
arr = Array()
arr = service.Append(arr, 123)
arr = service.Append(arr, 456)
Print(service.Contains(arr, 123))
For index = 0 To Ubound(arr)
    Print(arr(index))
Next index