RhinoScriptSyntax Selection Methods No Longer Working?

Scripting
, ,
12

I do not know if it is related and can post here or not.

My question is:
If I select a rhino spotlight in VBScript Rhino and run this Rhino.SelectedObjects() code,

Dim arrSelectedObjects
	arrSelectedObjects = Rhino.SelectedObjects()
	If IsArray(arrSelectedObjects) Then
		Rhino.Print("Selected Object")

I presume SelectedObjects() function will return Null as if no object is selected. And actually is not printing “Selected Object” I mean, a surface is working (and printing) well, but it is not taking the light into consideration.

Any idea?

Link: The full script