I have a regular list box on a form with 8 columns. The code to
load it is below. This scan loop gets about 60% thru then starts
slowing down. The first 60% loads fairly quickly, but the remaining
30 percent take 1 minute or so longer. There are 3000 records
in the table.

Anyone know whats going on?


SELECT Resh
SCAN

  nRow = nRow + 1

  cId = TRANSFORM(Resh.Id)
  cStation = ALLTRIM(Resh.StatName)
  cProgram = ALLTRIM(Resh.ProgTitl)
  cClient = ALLTRIM(Resh.ClientId)
  cPhone = ALLTRIM(BkPhone)
  cDateTime = DTOC(BkDate) + " " + BkTime
  cOrdQty = TRANSFORM(basordr)
  cState = ALLTRIM(State)

  .lstInfo.AddListItem(cId, nRow, 1)
  .lstInfo.AddListItem(cStation, nRow, 2)
  .lstInfo.AddListItem(cProgram, nRow, 3)
  .lstInfo.AddListItem(cClient, nRow, 4)
  .lstInfo.AddListItem(cPhone, nRow, 5)
  .lstInfo.AddListItem(cDateTime, nRow, 6)
  .lstInfo.AddListItem(cOrdQty, nRow, 7)
  .lstInfo.AddListItem(cState, nRow, 8)

ENDSCAN