Improve company productivity with a Business Account.Sign Up

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 243
  • Last Modified:

Array Question

Hi all,
I have code that looks like this.
Let result = term1+term2+term3+term4+term5
Print result
My question is this, how would I setup
An array to do the same thing?

Thanks
0
cdb424ttm
Asked:
cdb424ttm
1 Solution
 
sirbountyCommented:
Greetings cdb424ttm,
 Dim term() as integer '?

How are you getting the data for term?
You would need to fill each one by:
 term(1)=n
 term(2)=n

'etc

Then result could equal
for x=1 to 5 ' also can use lbound(term), ubound(term)
   result=term(x) + result
next x

~sirbounty
0
 
EDDYKTCommented:
just

let result = join(arr, "")
0
 
cdb424ttmAuthor Commented:
sirbounty
the data is pulled from 5 text boxes but not all the boxes are filled with some thing.
so I want it to loop Through the boxes and count only the ones that have data and pull their value.
0
Get your problem seen by more experts

Be seen. Boost your question’s priority for more expert views and faster solutions

 
cdb424ttmAuthor Commented:
not sure how to set it up to your syntax Eddykt.
I'm somewhat new to arrays
0
 
sirbountyCommented:
Take text box 1 and copy paste it to create a control array...

Text1(0) thru Text1(4)

For x = 0 to 4
  if text1(x) <> "" then strResults=val(text1(x).text) + strResults
next x

msgbox "Answer is " & strResults

0
 
cdb424ttmAuthor Commented:
Sirbounty,

How would I set a counter to go and loop through and count the number of boxes on the form.
I'm guessing something like this?

for x = 1 to text1(count)
next x

0
 
sirbountyCommented:
for x = 0 to ubound(text1)
0
 
Pi7Commented:
OK cdb424ttm, this code might help you.The assumption in this code is that all textboxes on Form1 may contain values. So the code below checks all textboxes on Form1

Dim x As Control
Dim y As Integer
For Each x In Form1
If TypeOf x Is TextBox And  Not IsNull(x.Text) Then
    Arr(y)= Val(x.Text)
    y=y+1
End If

Next x

Regards,
Pi7
0
 
sirbountyCommented:
My mistake...

for x = 1 text1.count
or
for x = 0 to text1.count - 1
0
 
sirbountyCommented:
Thanx.
0
 
cdb424ttmAuthor Commented:
sirbounty,

your last reply; what is the differents between them
0
 
sirbountyCommented:
Sorry for the delayed response...

When you create an array - it uses cardinal-ordered arrays (meaning leading index is 0).
Thus text1.count = 5 (0,1,2,3,4)

But if you reference a loop from 1 to 5, you need to adjust it

The above should read
for x = 0 to text1.count -1

text1.count is 5, so we subtract 1 from it to have our loop stop with the fifth element (#4)

Hope that helps explain it better.
Thanx.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now