Newsgroup: it.comp.lang.visual-basic
Titolo: Grid2.0 riga vuota non voluta

Ragazzi ho questo ciclo che mi sta facendo diventare matta. Sto usando la
Grid2.0 presa da
VBAccelerator
____________________________________________________________________--
    For lRow = 1 To .Rows
            If RisBP(lRow).Competenze > 0 Then
                For lCol = 1 To .Columns
                        If (lCol = lCodiceCol) Then
                           .CellDetails lRow, lCol, RisBP(lRow).Codice,
DT_CENTER
                        ElseIf (lCol = lDescrizioneCol) Then
                            .CellDetails lRow, lCol,
RisBP(lRow).Descrizione, DT_LEFT, Rnd * (ilsIcons.ImageCount - 1)
                        ElseIf (lCol = lAliquotaCol) Then
                            .CellDetails lRow, lCol, RisBP(lRow).Aliquota,
DT_CENTER
                        ElseIf (lCol = lN°GGOreCol) Then
                            .CellDetails lRow, lCol, RisBP(lRow).N°OreGG,
DT_CENTER
                        ElseIf (lCol = lTrattenuteCol) Then
                            .CellDetails lRow, lCol, RisBP(lRow).Ritenute,
DT_CENTER
                        ElseIf (lCol = lCompetenzeCol) Then
                            .CellDetails lRow, lCol, RisBP(lRow).Competenze,
DT_CENTER
                        End If
            Next lCol
       End If
    Next lRow
______________________________________________________________________
Quella condizione che ho messo tra For lRow e For lCol l'ho messa in modo
tale da far apparire solo le voci
che abbiano un risultato utile. Il problema è che logicamente quando una
voce è = 0 non la scrive ma mi lascia
una riga vuota perchè logicamente il conto delle righe va avanti.
Ho provato a mettere un else con lRow = lRow -1 ma mi entra in un ciclo
infinito stessa cosa se anzichè andare a diminuire lRow diminuisco
.Rows di uno.
Mi date una mano? ho un Input

 una riga vuota perchè logicamente il conto delle righe va avanti.
In questi casi non puoi basarti sulle variabili del for, ne devi usare una
che sarà il contatore effettivo delle righe utilizzate:
Dim varFor as long
Dim varCount as long
For varFor = 1 To 10
    If varFor Mod 2 = 0 Then
        varCount = varCount + 1
        Debug.Print "Numero pari " & varFor & " nella riga " & varCount
    End If
Next varFor
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

Il 24/04/2004 19.03, Deborah scrisse:

Se *ai* un input, usalo! :-)
Se ti e' possibile non creare le righe della griglia prima del ciclo 
for, ma crea una nuova riga solo quando:
RisBP(lRow).Competenze > 0
Oppure usa un'altra variabile come limite superiore del ciclo.
Se sai che il numero di "dati" massimo da visualizzare e' maxrighe, puoi 
scrivere:
for lRow = 1 To maxrighe
   If RisBP(lRow).Competenze > 0 Then
	.addrow
         for ...
	...
	next
   endif
next
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 Mi date una mano?
Ehm.... :-)
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

 per fortuna io sono un uomo :-P
Non certo un galantuomo ...


 Non certo un galantuomo ...
beh si diceva per scherzare. non avevo alcuna intenzione di offendere.


 
Ci mancherebbe anche che tu volessi offendere!
;-)


 Ehm.... :-)
Non puoi perchč le hai entrambe occupate? Occhio ai calli
Comunque ho risolto perchč scrivendo la mail mi sono accorta
(e l'ho anche detto) che caricavo nell'array anche risultati che
non mi servivano per poi trovarmi con il problema di doverli
smaltire nel ciclo For Next. Quindi sono andata a monte č ho messo
una condizione IF in modo da caricare solo Risultati utili e non
dovermi poi trovare a diventare scema dopo...
Bacie buon week end
Debby -----)@

 
Tu e Nicola formate un'ottima coppia. Complimenti!
Oxford o Cambridge?
:-)


 Oxford o Cambridge?
lol


 Non puoi perchč le hai entrambe occupate? Occhio ai calli
Veramente non ho 2 mani ma Otto mani ;-)


 
Con questa battuta, se fossi donna, cadrei tra le tue braccia...


 Con questa battuta, se fossi donna, cadrei tra le tue braccia...
LOL
Il comico dovevo fare! non il programmatore.... mannaggia alla miseria! :-P


 
Otto mani, come programmatore, sono un bel vantaggio. Come comico, non 
lo so...


 lo so...
Anche questo è vero...
bye .con una punta di rimorso perchè la selezione naturale(Otto mani) prende
il soprevvento sulle aspirazioni (comico)


 
Puoi sempre vendere le 6 di troppo e mandare un cv a Zelig!
;-)


> Puoi sempre vendere le 6 di troppo e mandare un cv a Zelig!
Che tralaltro è a 1 Km da casa mia...
Quasi quasi apro un 3d "[OT] Vendesi 6 mani causa inutilizzo"... che ne
dici?
bye


 dici?
Meglio postare su it.annunci.seconda-mano


> Meglio postare su it.annunci.seconda-mano
6 *mani* di seconda *mano*? :-)


Vedo che in mia assenza vi divertite eh!
Bravi bravi.....
Se fate i programmatori come fate i comici incomincio ad avere dei dubbi
Deb

 
Se tu quotassi capirei anch'io di cosa stai parlando ;)
Ciao


Se fossimo bravi comici così come siamo (dovremmo essere) bravi
programmatori, probabilmente saremmo a Zelig....
