Newsgroup: it.comp.lang.visual-basic
Titolo: Geniacci del VB...una domandina semplice semplice per voi :))

Dunque, ho un filettino fatto in questo modo:
001 AAAA BBBB CCCC
001 AAAA BBBB CCCC
001 AAAA BBBB CCCC
002 AAAA BBBB CCCC
002 AAAA BBBB CCCC
003 AAAA BBBB CCCC
- - - -
- - - -
- - - -
00N AAAA BBBB CCCC
Ci sono al suo interno, sequenzialmente delle line uguali. Mi serve un
applicanzioncina che mi crea lo stesso file tagliando però le linee
doppie, quindi avere un a cosa del genere:
001 AAAA BBBB CCCC
002 AAAA BBBB CCCC
003 AAAA BBBB CCCC
- - - -
- - - -
- - - -
00N AAAA BBBB CCCC
A me era venuto in mente un ciclo molto semplice ma poi mi sono
incartato quando ho dovurto scrivere i vari "do while" etc etc...a voi
che viene in mente??


prova con il seguente:
dim szBuf as string, szLastBuf as string
open "infile.txt" for input as #1
open "outfile.txt" for output as #2
szLastBuf = ""
do while not eof(1)
    line input #1, szBuf
    if szBuf <> szLastBuf then
        print #2, szBuf
        szLastBuf = szBuf
    end if
loop
close #1
close #2
Non l'ho controllato, a occhio dovrebbe andare.
Se non vuoi scartare le linee che sono completamente uguali, ma "quasi
uguali", modifica l'istruzione di confronto fra szBuf e szLastBuf.
Buon Lavoro!
Sig
_________________________________________________________
Luca Sigfrido Percich              
sigf...@tiscalinet.it
_________________________________________________________
non avere stile è il mio stile

Buon Lavoro!
Ciao!! :))
Si si, grazie per la risposta, ho risolto sul treno mentro tornavo a
casa :)) Sai quando hai quei momento che il caldo ti blocca il
cervello? Bhè, è quando mi è successo oggi mentre scrivevo il mio
messaggio...in effetti era una cosa banalissima, e io stesso l' ho
pensata come te, al di la dei nomi delle due variabili :))
Probabilmente se invece di questo programmino mi avessero chiesto il
mio nome...bhè, avrei postato anche in quel caso un messaggio di aiuto
:)) Domani lo provo bene e ti dico se ha funzionato...cmq non credo ci
siano problemi...grazie ancora!!

Newsgroup: it.comp.lang.visual-basic
Titolo: selezione multipla Dbgrid

Salve,
ho la necessità di selezionare tutti i record di una Dbgrid (associata ad un
DataControl) premendo un pulsante.
Ho fatto un ciclo:
for i = 0 to datacontrol.recordset.recordcount - 1
    dbgrid.SelBookmarks.add datacontrol.recodset.bookmark
    datacontrol.recordset.moveNext
next i
Il ciclo funziona, ma se la Dbgrid ha parecchi record (ad es. 50.000...) ci
mette un bel pò!.
Qualcuno sa dirmi come ovviare a questo problema?
Cè un modo molto + veloce x gestire la cosa?..
Grazie mille,
TG


Ciao,
Di solito il problema della lentezza del ciclo è dovuto dal fatto che
ogni volta che selezioni un elemento sulla dbgrid avviene un
aggiornamento grafico del controllo che rallenta il Ciclo, Prova cosi:
[Inizio Codice]
...
dbgrid.visible = false
for i = 0 to datacontrol.recordset.recordcount - 1
    dbgrid.SelBookmarks.add datacontrol.recodset.bookmark
    datacontrol.recordset.moveNext
next i
dbgrid.visible = true
...
[Fine Codice]
Fammi sapere nel caso trovi altri Problemi

 ha scritto nel messaggio
news:1164642856.4...@n67g2000cwd.googlegroups.com...
