Visualizzazione dei risultati da 1 a 4 su 4
  1. #1

    [vb.net 05]Stringa : Vai a Capo1

    ciao a tutti...
    sembra una stupidata.,.. ma nn sono riuscito a capire come si fa....

    tramite una funzione estraggo un stringa....

    codice:
    Public Function GetDates(ByVal FileName As String, ByVal Data1 As String) As Generic.List(Of String)
    
            Dim RetValue As New Generic.List(Of String)
            Dim stringhe As String
            Dim f As New Form1
    
            Dim Lines() As String = My.Computer.FileSystem.ReadAllText(FileName).Split(Environment.NewLine)
            For Each s As String In Lines
                Try
                    If s.Contains("Music Start: " & Data1) Then
                        s.StartsWith("Channel")
                        stringhe = (s)
                        If Not RetValue.Contains(stringhe) Then
                            RetValue.Add(stringhe)
    
                        End If
                    Else
    
                    End If
                Catch ex As Exception
    
                End Try
            Next
    
            Return RetValue
        End Function

    in output ho una cosa del genere...

    COME FACCIO NELLA TEXTBOX A MANDARE IL TESTO A CAPO
    DOVE INIZIA LA PAROLA "channel"?

    grazie

    l'output è un txtbox multiline

    For Each s As String In GetDates(Filename, Data1)
    With txtPdf
    .Multiline = True
    .AppendText(s)
    End With
    Next

    codice:
     
    
    Channel 1 - Music Start: 29.01.07 14:38:54 C:\Video\YCD\(Monxx) Robbie Williams - Advertising Space.mpg (UID:)Channel 1 - Music Start: 29.01.07 15:14:03 C:\Video\YCD\(Monxx) Robbie Williams - Advertising Space.mpg (UID:)
    Channel 1 - Music Start: 29.01.07 15:18:20 C:\Video\YCD\(Video) Robbie Williams - Feel.mpg (UID:)Channel 1 - Music Start: 29.01.07 15:22:23 C:\Video\YCD\CliP Mylo Vs Miami Sound Machine - Drop The Pressure Vs Doctor Beat.avi (UID:)Channel 1 - Music Start: 29.01.07 15:26:17 C:\Video\YCD\Coldplay - Talk.mpg (UID:)Channel 1 - Music Start: 29.01.07 15:30:59 C:\Video\YCD\Coldplay - The Scientist.mpeg (UID:)Channel 1 - Music Start: 29.01.07 15:35:06 C:\Video\YCD\Coldplay - Trouble.mpg (UID:)Channel 1 - Music Start: 29.01.07 15:39:18 C:\Video\YCD\Coldplay- Speed of sound.mpg (UID:)
    Channel 1 - Music Start: 29.01.07 15:43:30 C:\Video\YCD\Depeche Mode - Strange love.mpg (UID:)Channel 1 - Music Start: 29.01.07 15:47:02 C:\Video\YCD\Kylie Minogue - Cant Get You Out of My Head.mpg (UID:)Channel 1 - Music Start: 29.01.07 16:34:27 C:\Video\YCD\(Monxx) Robbie Williams - Advertising Space.mpg (UID:)

  2. #2
    Moderatore di Programmazione L'avatar di LeleFT
    Registrato dal
    Jun 2003
    Messaggi
    17,320

    Moderazione

    Per VB e il framework .NET esiste il sub-forum apposito.

    Ti sposto.


    Ciao.
    "Perchè spendere anche solo 5 dollari per un S.O., quando posso averne uno gratis e spendere quei 5 dollari per 5 bottiglie di birra?" [Jon "maddog" Hall]
    Fatti non foste a viver come bruti, ma per seguir virtute e canoscenza

  3. #3
    dove avevo scritto ??
    azz...su programmazione, scusa e grazie

  4. #4
    mi autorispondo...

    .AppendText(s & vbCrLf)


    ciao e scusate...
    non avevo raffinato la ricerca

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.