Visual Basic Forum for Visual Basic Programmers VB

[gphillips]

Guys,
Uisng VB 6.0
Some of this code I don't understand. Basically some kind of export activity to excel - using ascii principles/arrays/textbox array index. Ascii principle may relate to the cell reference of the spreadsheet.

Dim wkbobj as integer
Dim i as integer
Dim j as integer
' Basically a spreadsheet 5 rows, down by 2 column wide
Dim arrdata (1to 5, 1to 2) as string

Don't Understand the below - exactly how the loop is working at each stage - even though I put comments in, would apprecaiate a simple break down as I don't understand.

'Row
For i = 1 to 5
'Columns
For j = 1 to 2
'For every row and column, evaluate the texbox array index

k = (i-1) * 2 + (j-1)
' Store the dta in the arrayData
arrData(i,j) = txtdata(k)
'Export the data in the array arrData to the excel Spreaasheet
wkbobj.worksheets (1).Range(Chr(j+64) & i) = arrData (i, j)

Next j
Next i
wkObj.Save.
End sub


Private Sub Form load()

Set wkobj = GetObject ("h:\xxxxx.xls")


How does tex box array index work don't understand the principles, what do I have to set up in my form for this to export?

Would really apprecaite a simpler break down of the above.

Thanks very much,

G.





[/u][/b]

[DoobieKeebler]

[gphillips]

Thanks very much, thats greatly appreciated buddy.

Q1.Something that puzzling me is :-

wkobject.worksheets (1). Range(Chr(j+64) & i) = arraDat (i, j)

Apreciate it creates letters A - E, but I thought it would be

1, 1 - a1 - 1down 1 accross
1,2 - a2 - 1 down 2 accross
2,1 - b1 - 2down 1 accross
2,2 - b2 - 2 diown 2 accross

and so on..,
Since there are only 5 rows for i (1TO 5), and 2 columns for j (1TO 2) in the spreadsheet. Am I wrong , if so why. I am not sure if the range part does anything particular to change this.

I assume creating textbox arrays only works on VB 6.0, tried it on VBA but it doesn't work.

I do need to do it on VB6.0 will try soon. Following these step by step, steps

Just to confirm my understanding is correct:-
1. Create a text box

2. name it txtdata(k) - in this case so the code matches do use (k) or do i leave it out I.E txtdata. I asume the k is the tex box array index as per the formula i.e .
k = (i-1) * 2 + (j-1)
but is it required in the data a it is refered to in my code.
3. Edit and copy

4. Edit and paste

5. "You already have a control named txtdata. Do you want to creat a control array.

6. Click yes.

Keep on repeating for all the textbox.

Q3. When you say index, do you mean tab index?

The timing code will be coming soon m8.

Thank you
G.

[DoobieKeebler]

Q1 > My bad. You're absolutely right. I mixed up i and j.

Q2 > I haven't worked with VBA forms so I'm not sure how that would work. In VB, leave out the (k) part. When you refer to a specific text box using code you'll have to add the (k). But when you make them just call them (the first one really) just txtdata. And your understanding is correct.

Q3 > No, there's a separate Index property. Alphabetically it's just under the HideSelection property for text boxes.

I was just playing around with some things. If you create txtdata and set its Index to 0, when you copy and paste the control VB won't ask you if you want to create a control array. You've already told it that you want one, just by setting the Index property.

Looking forward to the timing code.
_________________
Always take into account what a user would never ever in a million years do, because someone will.

"In theory, there's no difference between theory and practice. In practice, there is." -- Yogi Berra

[gphillips]

Thinking about this more, in relation to text box arrays index.

Basically I have an output text box (multiline). The frequency refers to the number of times the user has hit that time. The time is how long it took to enter a random letter.

Time Frequency
0.2 2
0.5 3


Basically I would want to export time in worksheet 1 and frequency in worksheet 2. Is this possible? How does the theory of textbox array index work here. How can this been done what extra code inclusions.

[gphillips]

Sorry the 2 and 5 should be under the frequency heading , just need to be moved across, please not this one output multiline tex box , but can array theory textbox work here, so I can export the the time taken in worksheet1, frequency in worksheet 2.

[gphillips]

2 and 3 I meant whoops.

Cheers,

Greg.

[gphillips]

2 and 3 I meant whoops.

Cheers,

G.