Leggere stringa a tempo in una textbox

di il
11 risposte

Leggere stringa a tempo in una textbox

Sareste cosi gentili da darmi una mano?
Ho salvato un file.txt in c: avrei bisogno di sapere come potrei fare per leggerlo in una textbox ad un intervallo di tempo, ossia che ogni tot vada in automatico a leggere la stringa successiva.
Questo è il codice, mille grazie!!!

Imports System.IO
Imports System.IO.File

Public Class Form1
Dim fullPath As String = "C:\test7.txt"
Dim linee As New List(Of String)
Dim linea As String

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

If Not IO.File.Exists(fullPath) Then 
MessageBox.Show("Il non esiste!")
Exit Sub
End If

Using SR As New IO.StreamReader(fullPath)
linea = SR.ReadLine
Do Until linea Is Nothing
linee.Add(linea) 
linea = SR.ReadLine 
Loop
TextBox1.Text = String.Join(Environment.NewLine, linee)
End Using
End Sub
End Class

11 Risposte

  • Re: Leggere stringa a tempo in una textbox

    Non si è capito cosa vuoi fare. E quel codice cosa è?

    Non puoi dire due parole, mollare del codice e pensare che qualcuno risolva interamente il tuo problema.
  • Re: Leggere stringa a tempo in una textbox

    Pardon, hai ragione!
    Ho un file.txt salvato in c, questo file è composto da molte stringhe e con il cod che ho postato me lo scrive su di una textbox stringa per stringa. Il mio problema è che x passare alla stringa successiva devo per forza usufruire delle frecce sulla tastiera, invece avrei bisogno che venisse visualizzata nella textbox la nuova stringa dopo 1 secondo, senza nessun intervento da parte del utente, sarebbe possibile? Grazie mille!!
  • Re: Leggere stringa a tempo in una textbox

    Inserisci una Sleep di 1000 ms al posto della gestione tasti
  • Re: Leggere stringa a tempo in una textbox

    Scusa la mia ignoranza, ma x gestione tasti intendi la simulazione della pressione del tasto "freccia"?
    Non riesco ad uscirne, ho provato anche con l'auto scroll in un timer ma non funzia, ho provato a inserire un semplice timer ma mi annulla il loop del cod, ho provato con l'evento keydown della text box ma non cambia niente!
    Mi appello al vostro bun Cuore
  • Re: Leggere stringa a tempo in una textbox

    Quando dici

    devo per forza usufruire delle frecce sulla tastiera

    cosa intendi? Nel codice non c'è alcuna gestione dei tasti di cui parli.
  • Re: Leggere stringa a tempo in una textbox

    Nella text box, ci sono tutte le stringhe del file, per visualizzare la riga successiva devo premere o con il mouse sulla srollbars oppure mi da lo stesso risultato anche con le frecce della tastiera, nonostante non abbia aggiunto nessuna gestione tasti!
  • Re: Leggere stringa a tempo in una textbox

    Dopo la lettura della riga, prova ad usare:
    
            TextBox1.Focus()
            SendKeys.Send("^{END}")
    
  • Re: Leggere stringa a tempo in una textbox

    Ragazzi... grazie mille x la vostra disponibilità!!!!
    Ho provato e riprovato ma non funziona,(o molto piu probabilmente non sono in grado di farlo funzionare) mi mostra la prima riga e poi passa direttamente sull'ultima!!
  • Re: Leggere stringa a tempo in una textbox

    Mostra il TUO codice.
  • Re: Leggere stringa a tempo in una textbox

    Imports System.IO.File
    Imports System.IO
    
    Public Class Form1
        Dim fullPath As String = "C:\test7.txt"
        Dim linee As New List(Of String)
        Dim linea As String
    
        Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            If Not IO.File.Exists(fullPath) Then
                MessageBox.Show("Il File non esiste!")
                Exit Sub
            End If
            Using SR As New IO.StreamReader(fullPath)
                linea = SR.ReadLine
                Do Until linea Is Nothing
                    linee.Add(linea)
                    linea = SR.ReadLine
    
                    
                Loop
            End Using
            TextBox1.Text = String.Join(Environment.NewLine, linee)
            TextBox1.Focus()
            SendKeys.Send("^{END}")
    
        End Sub
    End Class
  • Re: Leggere stringa a tempo in una textbox

    O potrebbe anche andare bene un cod che mi apra il file txt e mi scrive la prima linea nella text box, attende mezzo secondo, mi scrive la seconda, senza cancellarmi la prima, attende mezzo secondo, mi scrive la terza ecc..
Devi accedere o registrarti per scrivere nel forum
11 risposte