Oppure

Loading
29/12/08 20:01
magicolotto
ciao ragazzi per pulire la griglia a riguardo uso questo codice 

Dim row As Integer
 Dim col As Variant
  For row = 1 To 30
   For col = 0 To 20
    MSHFlexGrid2.col = col
     MSHFlexGrid2.row = row
      MSHFlexGrid2.CellBackColor = &HC0C0C0
   Next col
  Next row


Esso risulta molto lento, lentissimo

sapreste indicarmi un'altra soluzione?

Ultima modifica effettuata da magicolotto 29/12/08 20:01
aaa
29/12/08 20:10
GrG
no...penso sia questa l'unica soluzione...(potrei pure sbagliarmi eh)...
aaa
29/12/08 20:16
magicolotto
è lento

sto scervellando

aaa
30/12/08 18:39
bias
Postato originariamente da magicolotto:

ciao ragazzi per pulire la griglia a riguardo uso questo codice 

Dim row As Integer
 Dim col As Variant
  For row = 1 To 30
   For col = 0 To 20
    MSHFlexGrid2.col = col
     MSHFlexGrid2.row = row
      MSHFlexGrid2.CellBackColor = &HC0C0C0
   Next col
  Next row


Esso risulta molto lento, lentissimo

sapreste indicarmi un'altra soluzione?



ciao magicolotto, prova a fare così: 
Dim row As Integer
 Dim col As Variant
    MSHFlexGrid2.visible = False
  For row = 1 To 30
   For col = 0 To 20
    MSHFlexGrid2.col = col
     MSHFlexGrid2.row = row
      MSHFlexGrid2.CellBackColor = &HC0C0C0
   Next col
  Next row
    MSHFlexGrid2.visible = True


Dovrebbe essere molto più veloce, così faccio io pure per riempire la griglia.

bye :asd:;)
aaa
30/12/08 18:56
magicolotto
siiii woww ecco ... si è veloce .....

caspita

non ci avevo pensato


grazie :k:
aaa