Interested to Buy Any Domain ? << Click Here >> for more details...
Is it possible to return multiple values from a function..?
Then how..?
- 3 Answers
- 16232 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / satish j
It is possible to return multiple values from a function?
Here I am taking the return values in an array and using
them as I want
mynum1 = 0
mynum2 = 0
dim linklist(2)
imax = ubound(linklist)
Function fncl1(ByRef mynum1,mynum2, x , y)
If i= 0 Then
z = "+"
Select Case z
case "+"
mynum1 = x +y
msgbox mynum1
fncl1 = mynum1
End select
else
z = "-"
Select Case z
case "-"
mynum2 = x- y
msgbox mynum2
fncl1 = mynum2
End Select
end if
End Function
For i=0 to imax
linklist(i) = fncl1(mynum1,mynum2,5,4)
If linklist(i) = mynum2 Then
Exit for
End If
Next
msgbox linklist(0)+linklist(1)
msgbox linklist(0)&","&linklist(1)
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / rico
One way of getting mutiple values from function is by
passing values "ByRef" to the funtion and storing the
return values in the one or more arguemnts passed to the
functions.
Ex :
mysum = 0
msgbox mysum ' return 0
mysub = 0
msgbox mysub ' return 0
Function fnmul(byref mysum, mysub, x , y)
mysum = x + y
msgbox mysum 'return 9
mysub = x - y
msgbox mysub 'return 1
End Function
Call fnmul( mysum, mysub, 5, 4)
msgbox mysum 'return 9
msgbox mysub 'return 1
| Is This Answer Correct ? | 3 Yes | 2 No |
Answer / rico
If we pass the parameters by "Byval" the last two msgbox
statement will return "0"
Ex :
mysum = 0
msgbox mysum ' return 0
mysub = 0
msgbox mysub ' return 0
Function fnmul(byval mysum, mysub, x , y)
mysum = x + y
msgbox mysum 'return 9
mysub = x - y
msgbox mysub 'return 1
End Function
Call fnmul( mysum, mysub, 5, 4)
msgbox mysum 'return 0
msgbox mysub 'return 0
| Is This Answer Correct ? | 1 Yes | 3 No |
How to create a Runtime property for an object in QTP?
how many maximum number of virtual users we can create?
I am new with QTP. Is anybody could tell me where I can find a good tutorial with lots of samples?
when to start the automation?
Hi,iam new to automation and i have 1 year experience in manual testing.I have a little bit idea about QTP9.0 .But i have no idea about script writing using VB.Please help to learn script writing.
When to Insert transactions in QTP?
What is keyword view in qtp?
When Object Repository is available what is the necessity of having Descriptive programming which needs more scripting efforts.
hello, i just started searching for a job on QA ,need QTP software full version.plz can any body help me...my email id is padma_ub@yahoo.com.thanks in advance.
pls tell me different type of automation frame works in QTP and which one need to select in client server application
How to open a new test using quicktest professional (qtp)?
How to test the mandatory fields in QTP?
WinRunner 
