UtterAccess.com
X   Site Message
(Message will auto close in 2 seconds)

Welcome Guest ( Log In | Register )

 
Reply to this topicStart new topic
> return a value from a function    
 
   
ryjyd
post Jul 9 2004, 02:18 PM
Post #1

UtterAccess Addict
Posts: 109
From: ohio



I know this is simple, but when I search for it, the answer will not come. Note this example:
CODE
sub somecode()
othernumber = 1
somenumber = changesomenumber(othernumber)
cells(1,1) = somenumber 'the number is 2
end sub
'
'
sub changesomenumber(changethis)
thisone = changethis + 1
'''''this is the part where I send thisone back
end sub


I get stuck at the part where I send the variable "thisone" back to the function "somecode()". How do I return the value of "thisone"? What is the code needed? Do I need to send something else back? Many thanks for the help given
Go to the top of the page
 
+
ALaRiva
post Jul 9 2004, 02:23 PM
Post #2

UtterAccess VIP
Posts: 7,132
From: Perris, California



A Sub cannot return a value, only Functions can return values.

Try this:
CODE
Function changesomenumber(changethis As Integer)
changesomenumber = changethis + 1
end sub


You need to make sure and declare all datatypes for variables and arguments that you pass into the functions.

HTH, Thanks.
Go to the top of the page
 
+
ryjyd
post Jul 9 2004, 02:40 PM
Post #3

UtterAccess Addict
Posts: 109
From: ohio



When you say declare all datatypes, I assume you mean "(changethis As Integer)". In my code, the first procedure should have a line of code stating: "Dim othernumber As Integer" before it's used. And finally, the act of using the function name as the name of a variable inside the function will send that value back to the procedure when I called that function... Do I have all of this right?
Go to the top of the page
 
+
ALaRiva
post Jul 9 2004, 02:44 PM
Post #4

UtterAccess VIP
Posts: 7,132
From: Perris, California



Yes, that's what I meant about the declarations, however, even though you declared the datatype for the variable othernumber, you still need to declare the datatype for the argument that will be passed into the function. That's why I did the changethis As Integer.

Yes, just use the function name as if it was a variable to send the value back.

For Example
CODE
Function Test()

Test = "Some Value"

End Function


You may also want to declare what type of return you will get from the function, so it would be like this:
CODE
Function Test() As String
Test = "Some String"
End Function


HTH, Thanks.
Go to the top of the page
 
+
ryjyd
post Jul 9 2004, 03:01 PM
Post #5

UtterAccess Addict
Posts: 109
From: ohio



Wonderful... Thanks so much for your help. You have a great weekend.
Go to the top of the page
 
+
ALaRiva
post Jul 9 2004, 03:02 PM
Post #6

UtterAccess VIP
Posts: 7,132
From: Perris, California



You're Welcome . . . (IMG:http://www.utteraccess.com/forum/style_emoticons/default/frown.gif)
Go to the top of the page
 
+

Thank you for your support! Reply to this topicStart new topic

Jump To Forum:
 



RSS Go to Top  ·  Lo-Fi Version Time is now: 24th May 2013 - 06:09 AM