Programming Forums > Application Development > Visual Basic .NET

dwizzle13 · Dec 14th, 2006, 4:20 PM

How can I change this code to get the product of the numbers between 1 and a variable n. Here's the code, and I can just get the n's square.

(Toggle Plain Text)

    Function product(ByVal n As Double, ByRef i As Double)
        Dim a As Double
        For i = 1 To n
            a = n * i
        Next
        Return a
    End Function

Thanks.

Pizentios · Dec 14th, 2006, 5:18 PM

well, right now you are reseting the varible "a" to a new number everytime your loop runs.

you need to add the value to a, here's how i would do it.

(Toggle Plain Text)

Function product(ByVal n As Double, ByRef i As Double)
       Dim a As Double
       a = 0
       for i = 1 To n
              a = a + (i*n)
       Next
       Return a
End Function

not sure if that's what you are looking for. Also, this looks like homework....please don't let it be homework, mainly because posting homework questions is against the forum rules.

dwizzle13 · Dec 14th, 2006, 7:33 PM

Thanks, no, it's for myself. I'm trying to learn vb from an old book, but I didn't know what to do.

Pizentios · Dec 15th, 2006, 10:09 AM

ah ok, cool...for i minute there i thought i was doing your homework (we get a lot of people trying to get us to do home work questions).

Dec 14th, 2006, 4:20 PM	#1
dwizzle13 Newbie Join Date: Oct 2006 Posts: 19 Rep Power: 0	Help - Get the product of the numbers between 1 and n? How can I change this code to get the product of the numbers between 1 and a variable n. Here's the code, and I can just get the n's square. (Toggle Plain Text) Function product(ByVal n As Double, ByRef i As Double) Dim a As Double For i = 1 To n a = n * i Next Return a End Function Function product(ByVal n As Double, ByRef i As Double) Dim a As Double For i = 1 To n a = n * i Next Return a End Function Thanks.

Dec 14th, 2006, 5:18 PM	#2
Pizentios Programming Guru Join Date: May 2004 Location: Brandon, Manitoba, Canada Posts: 2,023 Rep Power: 7	well, right now you are reseting the varible "a" to a new number everytime your loop runs. you need to add the value to a, here's how i would do it. (Toggle Plain Text) Function product(ByVal n As Double, ByRef i As Double) Dim a As Double a = 0 for i = 1 To n a = a + (in) Next Return a End Function Function product(ByVal n As Double, ByRef i As Double) Dim a As Double a = 0 for i = 1 To n a = a + (in) Next Return a End Function not sure if that's what you are looking for. Also, this looks like homework....please don't let it be homework, mainly because posting homework questions is against the forum rules. __________________ Profanity is the one language that all programmers understand. Check out my Blog <---updated Nov 30 2007!

Dec 14th, 2006, 7:33 PM	#3
dwizzle13 Newbie Join Date: Oct 2006 Posts: 19 Rep Power: 0	thanks Thanks, no, it's for myself. I'm trying to learn vb from an old book, but I didn't know what to do.

Dec 15th, 2006, 10:09 AM	#4
Pizentios Programming Guru Join Date: May 2004 Location: Brandon, Manitoba, Canada Posts: 2,023 Rep Power: 7	ah ok, cool...for i minute there i thought i was doing your homework (we get a lot of people trying to get us to do home work questions). __________________ Profanity is the one language that all programmers understand. Check out my Blog <---updated Nov 30 2007!

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Hybrid Mode Switch to Threaded Mode

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
CGI Script - change product display	jess	Perl	3	Jul 12th, 2006 5:25 PM
Median/Mode in arrays? {Need help}	Java\|Tera	Java	27	Nov 29th, 2005 10:50 AM
Reading in multiple numbers	wingz198	C++	2	Oct 14th, 2005 1:45 PM
Prime Numbers	Konnor	C++	6	Sep 12th, 2005 6:46 PM
Assignment of numbers to variables without asking	Haz	C#	26	May 23rd, 2005 10:30 AM

Programming Forums > Application Development > Visual Basic .NET

Help - Get the product of the numbers between 1 and n?