Functions

[Microsoft]

I know how to call a finction and pass a parameter to it, but I don;t
understand how to take the resulting output of the function and use it from
the subroutine that called the function

Something like

I have a number
I send the number to a fumction that divides it by 2
I then can refer to the quotient as a variable in my original subroutine.

[Herfried K. Wagner [MVP]]

* "Microsoft" <ma*@mas.com> scripsit:

I know how to call a finction and pass a parameter to it, but I don;t
understand how to take the resulting output of the function and use it from
the subroutine that called the function

Something like

I have a number
I send the number to a fumction that divides it by 2
I then can refer to the quotient as a variable in my original subroutine.

\\\
Public Function DivideBy2(ByVal Number As Double) As Double
Return Number / 2
End Function
..
..
..
Dim d As Double = DivideBy2(34.56 )
///

--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>

[Arne Janning]

Microsoft wrote:

I know how to call a finction and pass a parameter to it, but I don;t
understand how to take the resulting output of the function and use it from
the subroutine that called the function

Something like

I have a number
I send the number to a fumction that divides it by 2
I then can refer to the quotient as a variable in my original subroutine.

Sub test1
Dim i as Integer = 2
Dim f as Float = test2(i)
'Now f has the result of function test2
End Sub

Funktion test2(ByVal i as Integer)
Dim f as Float = i / 2
Return f
End Funktion

Cheers

Arne Janning

[Arne Janning]

Arne Janning wrote:

Microsoft wrote:

I know how to call a finction and pass a parameter to it, but I don;t
understand how to take the resulting output of the function and use it
from
the subroutine that called the function

Something like

I have a number
I send the number to a fumction that divides it by 2
I then can refer to the quotient as a variable in my original subroutine.

Sub test1
Dim i as Integer = 2
Dim f as Float = test2(i)
'Now f has the result of function test2
End Sub

Funktion test2(ByVal i as Integer)
Dim f as Float = i / 2
Return f
End Funktion

Cheers

Arne Janning

Ups,

this won't work...

Sub test1
Dim i as Integer = 2
Dim f as Float = test2(i)
'Now f has the result of function test2
End Sub

Funktion test2(ByVal i as Integer) as Float
Dim f as Float = i / 2
Return f
End Funktion

Now it works ;-)
Or take Herfrieds version...

Cheers

Arne Janning

[Microsoft]

Thanks for the replies. Can a fumction return more than one value in vb.net?
"Arne Janning" <sp************ *****@msn.com> wrote in message
news:%2******** ********@tk2msf tngp13.phx.gbl. ..

Microsoft wrote:

I know how to call a finction and pass a parameter to it, but I don;t
understand how to take the resulting output of the function and use it from the subroutine that called the function

Something like

I have a number
I send the number to a fumction that divides it by 2
I then can refer to the quotient as a variable in my original

subroutine.
Sub test1
Dim i as Integer = 2
Dim f as Float = test2(i)
'Now f has the result of function test2
End Sub

Funktion test2(ByVal i as Integer)
Dim f as Float = i / 2
Return f
End Funktion

Cheers

Arne Janning

[Armin Zingler]

"Microsoft" <ma*@mas.com> schrieb

I know how to call a finction and pass a parameter to it, but I
don;t understand how to take the resulting output of the function and
use it from the subroutine that called the function

Something like

I have a number
I send the number to a fumction that divides it by 2
I then can refer to the quotient as a variable in my original
subroutine.

http://msdn.microsoft.com/library/en...Procedures.asp
--
Armin

How to quote and why:
http://www.plig.net/nnq/nquote.html
http://www.netmeister.org/news/learn2quote.html

[Herfried K. Wagner [MVP]]

* Arne Janning <sp************ *****@msn.com> scripsit:

Dim f as Float = test2(i)
'Float'?
Funktion test2(ByVal i as Integer) as Float
Dim f as Float = i / 2
Return f
End Funktion
'Funktion'?
Now it works ;-)
Or take Herfrieds version...

LOL!

--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>

[Arne Janning]

Microsoft wrote:

Thanks for the replies. Can a fumction return more than one value in vb.net?

No. (See the link posted by Armin)

But it can return arrays, structures or objects which can of cource
contain more than one value.

Cheers

Arne Janning

[Herfried K. Wagner [MVP]]

* "Microsoft" <ma*@mas.com> scripsit:

Thanks for the replies. Can a fumction return more than one value in vb.net?

There are different ways to return more than one value:

\\\
Public Sub Swap(ByRef x As Integer, ByRef y As Integer)
dim t As Integer = x
x = y
y = t
End Sub
..
..
..
Dim i As Integer = 22
Dim j As Integer = 99
Swap(i, j)
MsgBox(CStr(i))
MsgBox(CStr(j))
///

- or -

\\\
Public Class CalculationResu lt
Public x As Integer
Public y As Integer
Public s As String
...
End Class
..
..
..
Public Function Calculate(...) As CalculationResu lt
Dim c As New CalculationResu lt()
c.x = ...
c.y = ...
Return c
End Function
..
..
..
Dim c As CalculationResu lt = Calculate(...)
MsgBox(CStr(c.x ))
MsgBox(CStr(c.y ))
MsgBox(c.s)
///

- or -

\\\
Public Function Foo() As String()
Return New String() {"Hello", "World"}
End Function
..
..
..
Dim astr() As String = Foo()
MsgBox(astr(0))
MsgBox(astr(1))
///

--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>

[Arne Janning]

Herfried K. Wagner [MVP] wrote:

* Arne Janning <sp************ *****@msn.com> scripsit:

Dim f as Float = test2(i)

'Float'?

Funktion test2(ByVal i as Integer) as Float
Dim f as Float = i / 2
Return f
End Funktion

'Funktion'?

Now it works ;-)
Or take Herfrieds version...

LOL!

OK Herfried,

let's take your version.
Seems like I won't be able to get this working ;-)

Cheers

Arne Janning