GetNodeDisplacements not populating dDisplacementArray (vbscript)

I appear to be getting no values in my dDisplacementArray when using the GetNodeDisplacements function in vbscript. I'm not even getting zeros. I've written it as the following:

Dim lLoadCase as Long

lLoadCase = 1
Dim dDisplacementArray(5)
Dim lNodeNo As Long
lNodeNo = 2379
objOpenSTAAD.Output.GetNodeDisplacements (lNodeNo, lLoadCase, dDisplacementArray)

Any ideas?