वीबीस्क्रिप्ट पैरामीटर

Question

गुड डे,

पर आधारित फ़ंक्शन में एक सरणी बनाएं, मैं एक सरणी वापस करने के लिए एक VBScript फ़ंक्शन बना रहा हूं। लेकिन मैं सरणी आकार के लिए पैरामीटर में पास करना चाहता हूं।

Function CreateArray(arraySize) 
    Dim someArray(arraySize)    ' EXPECTED INTEGER CONSTANT 
    For i = 0 to UBound(someArray) 
     someArray(i) = 5 
    Next 

    CreateArray = someArray 
End Function 

लेकिन मैं एक त्रुटि हो रही है:

अपेक्षित पूर्णांक लगातार

इस VBScript में ऐसा करना संभव है?

TIA,

Coson

Answer 1

हां। आप Redim कथन का उपयोग करते हैं:

Function CreateArray(arraySize) 
    Dim someArray()    
    Redim someArray(arraySize) 
    For i = 0 to UBound(someArray) 
     someArray(i) = 5 
    Next 
    CreateArray = someArray 
End Function