Article ID: 100195
Article Last Modified on 1/8/2003
Sub Form_Load ()
Grid1.Rows = 20
Grid1.Cols = 8
'Initialize the grid with random data
For I = 0 To 19
Grid1.Row = I
For J = 0 To 7
Grid1.Col = J
Grid1.Text = Format$(I) + Format$(J)
Next J
Next I
Form2.Show
End Sub
Additional query words: buglist3.00 3.00 fixlist4.00
Keywords: kbbug kbfix KB100195