Can I do: Private Function XX() (ByVal ABC As String) As Single ? Trying to return XX() ...

Question

3.50/5 (2 votes)

See more:

Hi folks, quick question. I'm trying to return this: Dim XX() As Single
from a function. But I also need to pass this parameter ABC to the function.

the way I wrote in the subject of this post is wrong, but that's what i'm trying to do and not sure how. any suggestions appreciated.

p.s. The Function actually assigns values to each element of the array XX()
The function actually assigns a value to each element in the array XX() . so upon returning, i'm hoping to return the whole populated array

Posted 20-Jun-12 4:15am

SandiegoSSD

Updated 20-Jun-12 4:44am

v4

Add a Solution

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Maciej Los · Accepted Answer · 2012-06-20T04:20:00

Solution 1

If you use Private word, the function will be visible only in this module where is defined. To use it in the other modules and to get more informations, read about SCOPE[^]

VB

Function XX() (ByRef ABC As Integer) As Single
Dim RetVal As Single = 0
    
    'do something

    Return RetVal
End Function

Usage:

VB

Dim abc As Integer = 5
Dim sngValue As Single = XX(abc)
Msgbox sngValue.ToString()

Posted 20-Jun-12 4:20am

Maciej Los

Updated 20-Jun-12 4:21am

v2

Comments

VJ Reddy 20-Jun-12 12:54pm

From the description given in the question I think the OP wants to return an array of elements by the Function.
Please see my answer.
Thank you.

Maciej Los 20-Jun-12 15:20pm

Yes, but the OP changed the question ;) Please, see the first version.

VJ Reddy 20-Jun-12 22:22pm

Seen the initial version. I think the intent of the question is not clear in the initial version.
Thank you :)

Maciej Los 21-Jun-12 7:46am

;)

SandiegoSSD 20-Jun-12 13:16pm

Thanks.5

Maciej Los 20-Jun-12 15:20pm

Welcome ;)

Manas Bhardwaj 21-Jun-12 4:41am

good +5

Maciej Los 21-Jun-12 7:46am

Thank you, Manas ;)

VJ Reddy · Accepted Answer · 2012-06-20T06:53:00

The following syntax can be used to return an array of Single values.

The array is a reference type. Hence, even though xx is a local variable within the function when it is returned from the function it gives reference to the array object on the heap holding the values assigned within the function.

xx---refers--->array on heap. The statement Dim arrayOfElements = GetArrayOfElements(6) makes the local variable arrayOfElements---refers--->array on heap, so as it is required in the question, the array is returned, with the elements assigned within the function.

VB

Sub Main
    Dim arrayOfElements = GetArrayOfElements(6)
    For each element as Single in arrayOfElements
    	Console.WriteLine(element)
    Next element
End Sub

Private Function GetArrayOfElements(ByVal Abc as integer) as Single()
    'size of xx will be Abc+1 No. of elements
	Dim xx(Abc) as Single
	For I as integer = 1 to Abc
		xx(I) = I * 2
	Next I
	Return xx
End Function

'Output

'0
'2
'4
'6
'8
'10
'12

If the function is required to be used from outside the class in which it is declared, then public or other appropriate access level shall be for Function GetArrayOfElements