Event ExpandRow(row as integer)
Called when a row is expanded by the user. Rows added will be added as children of the expanding row.
//we'll just add a random mix of folders and rows.
For i As Integer=0 To Rnd*15
If Rnd>.5 Or Me.RowIsGroup(row) Then
me.addRow("SubRow "+Str(i)+" of row "+Str(row))
me.addFolder("SubFolder "+Str(i)+" of "+Str(row))