Torna indietro   Hardware Upgrade Forum > Software > Programmazione

Nokia Innovation Day 2025: l’Europa ha bisogno di campioni nelle telecomunicazioni
Nokia Innovation Day 2025: l’Europa ha bisogno di campioni nelle telecomunicazioni
Dal richiamo di Enrico Letta alla necessità di completare il mercato unico entro il 2028 alla visione di Nokia sul ruolo dell’IA e delle reti intelligenti, il Nokia Innovation Day 2025 ha intrecciato geopolitica e tecnologia, mostrando a Vimercate come la ricerca italiana contribuisca alle sfide globali delle telecomunicazioni
Sottile, leggero e dall'autonomia WOW: OPPO Reno14 F conquista con stile e sostanza
Sottile, leggero e dall'autonomia WOW: OPPO Reno14 F conquista con stile e sostanza
OPPO Reno14 F 5G si propone come smartphone di fascia media con caratteristiche equilibrate. Il device monta processore Qualcomm Snapdragon 6 Gen 1, display AMOLED da 6,57 pollici a 120Hz, tripla fotocamera posteriore con sensore principale da 50MP e generosa batteria da 6000mAh con ricarica rapida a 45W. Si posiziona come alternativa accessibile nella gamma Reno14, proponendo un design curato e tutto quello che serve per un uso senza troppe preoccupazioni.
Destiny Rising: quando un gioco mobile supera il gioco originale
Destiny Rising: quando un gioco mobile supera il gioco originale
Tra il declino di Destiny 2 e la crisi di Bungie, il nuovo titolo mobile sviluppato da NetEase sorprende per profondità e varietà. Rising offre ciò che il live service di Bungie non riesce più a garantire, riportando i giocatori in un universo coerente. Un confronto che mette in luce i limiti tecnici e strategici dello studio di Bellevue
Tutti gli articoli Tutte le news

Vai al Forum
Rispondi
 
Strumenti
Old 27-01-2010, 09:14   #1
radeon_snorky
Senior Member
 
Iscritto dal: Mar 2003
Messaggi: 2131
[VB.NET]lettura file di testo

salve gente!
ho un problemino piccolo piccolo ma per me insormontabile!
codice in premessa:
Codice:
ListView1.View = View.Details
        ListView1.CheckBoxes = True
        ListView1.Columns.Add("DATA", 50, HorizontalAlignment.Left)
        ListView1.Columns.Add("PRATICA", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("PV", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("NOTA", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("TECNICO", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("PREAVVISO", 40, HorizontalAlignment.Left)
        Dim line As String
        Dim i As Integer
        Dim readFile As System.IO.TextReader = New StreamReader("\\Server\scadenze.csv")
        While True
            line = readFile.ReadLine
            If line Is Nothing Then
                Exit While
            Else
                Dim campo() As String = Nothing
                campo = line.Split(",")
                For i = 0 To UBound(campo)
                    Dim l As ListViewItem = ListView1.Items.Add(campo(i))
                    Dim col2 As String = i + 1
                    l.SubItems.Add(campo(col2))
                    Dim col3 As String = i + 2
                    l.SubItems.Add(campo(col3))
                    l.SubItems.Add(campo(i))
                    l.SubItems.Add(campo(i))
                Next
            End If

        End While
il codice dovrebbe servire a popolare una listview in modo da separare i campi di un csv incolonnandoli per bene.
mi rendo conto che le ultime righe di codice (subitems) non funzionino... ma trovandomi in difficoltà ho deciso di scrivere sul forum e vedere se l'approccio scelto è sbagliato o meno e così decidere se buttare tutto il codice o meno...

passiamo alle considerazioni/domande:
nel codice apro il file e leggo una riga per ciclo, secondo me, per procedere ordinatamente, dovrei conoscerne il numero di riga per poi incasellarlo correttamente, giusto? il fatto è che non trovo una funzione che mi indichi il numero di riga! devo forse usare un ciclo for/next e prenderne l'indice?

quando incasello i dati è meglio inserirli tutti insieme o riga per riga, inserendoli nello stesso ciclo di lettura?

cercate di togliere la nebbia che mi sta inabissando!!!

grazie 1000
radeon_snorky è offline   Rispondi citando il messaggio o parte di esso
Old 27-01-2010, 10:04   #2
radeon_snorky
Senior Member
 
Iscritto dal: Mar 2003
Messaggi: 2131
che semo che sono!
Codice:
 ListView1.View = View.Details
        ListView1.CheckBoxes = True
        ListView1.Columns.Add("DATA", 50, HorizontalAlignment.Left)
        ListView1.Columns.Add("PRATICA", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("PV", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("NOTA", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("TECNICO", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("PREAVVISO", 40, HorizontalAlignment.Left)
        Dim line As String
        Dim i As Integer
        Dim path As String
        path = "\\Server\scadenze.csv"
        Dim readFile As System.IO.TextReader = New StreamReader(path)
        While True
            line = readFile.ReadLine
            If line Is Nothing Then
                Exit While
            Else
                Dim campo() As String = Nothing
                campo = line.Split(",")
                Dim l As ListViewItem = ListView1.Items.Add(campo(0))
                l.SubItems.Add(campo(1))
                l.SubItems.Add(campo(2))
                l.SubItems.Add(campo(3))
                l.SubItems.Add(campo(4))
            End If

        End While
    End Sub
se potete darmi delle dritte su come migliorare o procedere... in pratica devo poter filtrare/editare/cancellare i dati di quel file e POI realizzare degli avvisi in determinate circostanze (è uno scadenzario...)
radeon_snorky è offline   Rispondi citando il messaggio o parte di esso
Old 28-01-2010, 12:19   #3
radeon_snorky
Senior Member
 
Iscritto dal: Mar 2003
Messaggi: 2131
datagridview

meglio usare il datagridview?
a casa influenzato mi son messo a pistolare:
Codice:
Public Sub cataloga()
        Try
            Dim line As String
            Dim sTemp As String
            Dim campo() As String
            Dim fName As String = "c:\pippo1.csv"
            Dim sGridRow(6) As String
            Dim lineNumber As Integer = 0
            Dim reader As New IO.StreamReader(fName)
            DataGridView1.Rows.Clear()
            While reader.Peek <> -1
                line = reader.ReadLine()
                campo = Split(line, ";")
                For i As Integer = 0 To campo.Length - 3
                    sTemp = Replace(campo(i), """", "")
                    sGridRow(i) = sTemp
                Next
                Me.DataGridView1.Rows.Add(sGridRow)
                lineNumber += 1
            End While
        Catch ex As Exception
            Dim risp As Integer
            risp = MsgBox(ex, 17)
            If risp = 2 Then
                Exit Sub
            End If
        End Try
    End Sub
come al solito è codice copia/incollato e adattato... dite che è preferibile alla listview?
radeon_snorky è offline   Rispondi citando il messaggio o parte di esso
Old 28-01-2010, 12:44   #4
MarcoGG
Senior Member
 
L'Avatar di MarcoGG
 
Iscritto dal: Dec 2004
Messaggi: 3210
Il DataGridView è molto più adatto alla rappresentazione di tabelle dati, quindi il mio consiglio è : stai sul DataGridView...
MarcoGG è offline   Rispondi citando il messaggio o parte di esso
Old 28-01-2010, 14:44   #5
radeon_snorky
Senior Member
 
Iscritto dal: Mar 2003
Messaggi: 2131
Quote:
Originariamente inviato da MarcoGG Guarda i messaggi
Il DataGridView è molto più adatto alla rappresentazione di tabelle dati, quindi il mio consiglio è : stai sul DataGridView...
sempre tu a rispondermi... dovrò erigere una statua in tuo onore!!!
posso chiederti una cosa velocissima?
questi sono i libli che ho in casa:
http://www.ibs.it/code/9788804534600...basic-net.html
http://www.libreriauniversitaria.it/.../9788850320165
http://www.webster.it/libri-microsof...8861141148.htm
quest'ultimo in versione economica "pc professionale"

forse ne abbiamo già parlato (...scritto) ma che libri dovrei leggere per capire per bene vb?!?!?!?! quello di balena è un filino troppo tecnico... nel senso che spiega perfettamente ogni cosa ma non riesco a contestualizzarne il contenuto.
c'è qualche libro che faccia al caso mio?
radeon_snorky è offline   Rispondi citando il messaggio o parte di esso
Old 29-01-2010, 12:33   #6
MarcoGG
Senior Member
 
L'Avatar di MarcoGG
 
Iscritto dal: Dec 2004
Messaggi: 3210
Quote:
Originariamente inviato da radeon_snorky Guarda i messaggi
sempre tu a rispondermi... dovrò erigere una statua in tuo onore!!!
posso chiederti una cosa velocissima?
questi sono i libli che ho in casa:
http://www.ibs.it/code/9788804534600...basic-net.html
http://www.libreriauniversitaria.it/.../9788850320165
http://www.webster.it/libri-microsof...8861141148.htm
quest'ultimo in versione economica "pc professionale"

forse ne abbiamo già parlato (...scritto) ma che libri dovrei leggere per capire per bene vb?!?!?!?! quello di balena è un filino troppo tecnico... nel senso che spiega perfettamente ogni cosa ma non riesco a contestualizzarne il contenuto.
c'è qualche libro che faccia al caso mio?
E fatelo questo monumento !
Lo dite sempre e non lo fate mai. Mi va bene anche un monumento "virtuale"...

Scherzi a parte, sui 3 che hai citato :
- Il primo Balena lo conosco "di vista", non mi pare fosse "troppo tecnico".
Qui in giro ci sono diverse discussioni in cui consiglio i soliti 2 manuali di Balena su VB2005 ( validi anche per 2008 )...
- Gli altri 2 non li ho mai neanche sfogliati, soprattutto il primo non mi dice un granchè.

Se per "contestualizzare" intendi un manuale che ti guida passo passo alla realizzazione dell'applicativo-tipo che vorresti realizzare, a parte i soliti tutorial di start-up, temo sia una ricerca vana.
In genere quello che fa la differenza è la propria esperienza ( per fare il tavolo ci vuole il legno, per fare il legno ci vuole l'albero, per fare l'albero... ), e tanto, tanto, autoapprendimento.
Tieni presente che su una cosa sconfinata come VB 2008 un manuale "per esempi" davvero completo è una pia chimera.
MarcoGG è offline   Rispondi citando il messaggio o parte di esso
 Rispondi


Nokia Innovation Day 2025: l’Europa ha bisogno di campioni nelle telecomunicazioni Nokia Innovation Day 2025: l’Europa ha bisogno d...
Sottile, leggero e dall'autonomia WOW: OPPO Reno14 F conquista con stile e sostanza Sottile, leggero e dall'autonomia WOW: OPPO Reno...
Destiny Rising: quando un gioco mobile supera il gioco originale Destiny Rising: quando un gioco mobile supera il...
Plaud Note Pro convince per qualità e integrazione, ma l’abbonamento resta un ostacolo Plaud Note Pro convince per qualità e int...
Google Pixel 10 è compatto e ha uno zoom 5x a 899€: basta per essere un best-buy? Google Pixel 10 è compatto e ha uno zoom ...
L'industria farmaceutica americana si af...
Xiaomi YU7 GT avvistato al Nurburgring: ...
Intelligenza artificiale, agenti e strum...
Blocco note porta l'AI gratis sui PC, e ...
Arkheron, il nuovo gioco dell'ex lead de...
HONOR conferma Magic8: avrà AI na...
Auto volanti, il sogno si infrange: il p...
Cantieri in autostrada? Dal 2026 lo Stat...
Tesla non è molto trasparente su ...
Microsoft e NVIDIA guidano maxi-investim...
L'IA tira a indovinare? Non è un ...
'Limitare il riscaldamento globale a +1,...
Windows 11 25H2 si aggiorna già: ...
I 7 robot aspirapolvere più desid...
Ray-Ban Meta Gen 2: ecco i nuovi occhial...
Chromium
GPU-Z
OCCT
LibreOffice Portable
Opera One Portable
Opera One 106
CCleaner Portable
CCleaner Standard
Cpu-Z
Driver NVIDIA GeForce 546.65 WHQL
SmartFTP
Trillian
Google Chrome Portable
Google Chrome 120
VirtualBox
Tutti gli articoli Tutte le news Tutti i download

Strumenti

Regole
Non Puoi aprire nuove discussioni
Non Puoi rispondere ai messaggi
Non Puoi allegare file
Non Puoi modificare i tuoi messaggi

Il codice vB è On
Le Faccine sono On
Il codice [IMG] è On
Il codice HTML è Off
Vai al Forum


Tutti gli orari sono GMT +1. Ora sono le: 12:37.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Served by www3v