Button Captions from Flexgrid

[alexanderjames]

Hi All

I am really struggeling with something simple, i have a vsflexgrid with 1 col and 10 rows i then have an array of 10 command buttons cmdDep and i just can't seem to figure out how to get the names from each row in the grid to populate all 10 button captions. I did the same thing a while back with populating the captions from a database and that was no problem, but i can't seem to get my head around looping through the grid and the command buttons. Please could someone shed some light on this for me.

Many thanks in advance

[Webskater]

With MSFlexGrid1
For i = 1 to .Rows - 1 'assuming you have a fixed header row
cmdDep(i).Caption = .TextMatrix(i,0)
Next
End With

[iPrank]

Try this:

Private Sub GetButtonNames()
Dim i As Long
 
For i = 0 To 9
    cmdDep(i).Caption = MSFlexGrid1.TextMatrix(i, 0)
Next
 
End Sub

Edit: I assumed you have no fixed headers.

[alexanderjames]

Thank you so much guys, i knew i was missing something so simple, another question on the same topic, that i have been thinking about, i have 10 command buttons cmdDep and in my grid i have say 30 rows, so when the form loads it populates the captions from the first 10 rows of the grid, i have added a button cmdDown when clicked it must populate the captions with the next 10 rows from the grid and if clicked again populate from the next 10 rows. Any ideas on how i would be able to do this.

Many thanks

[Webskater]

Just store a variable containing the 'latest last number' of the rows you have used.

Private LastRow as Byte

Let's say in Form_Activate() you run the code that sets the captions using row 0 to row 9 ... at this point you would do this:

LastRow = 9

Then when you click the button you would use

For i = LastRow + 1 To LastRow + 11
cmdDep(i - (LastRow + 1)).Caption = MSFlexGrid1.TextMatrix(i,0)
Next

[Al42]

With MSFlexGrid1
For i = 1 to .Rows - 1 'assuming you have a fixed header row

Don't.

For i = .FixedRows to .Rows - 1

.FixedCols accounts for fixed columns.

[alexanderjames]

Thanks guys.

All sorted and working great.

Many thanks once again

[dtrade]

Hi All

I am really struggeling with something simple, i have a vsflexgrid with 1 col and 10 rows i then have an array of 10 command buttons cmdDep and i just can't seem to figure out how to get the names from each row in the grid to populate all 10 button captions. I did the same thing a while back with populating the captions from a database and that was no problem, but i can't seem to get my head around looping through the grid and the command buttons. Please could someone shed some light on this for me.

Many thanks in advance

How did you put command buttons into the vsFlexgrid?

[iPrank]

@dtrade,
Similar to this way.