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

    [VB6] scrivere nei file una tabella

    Ciao a tutti,
    ho un problema col quale nn vado per niente daccordo:

    come posso scrivere in un file una sorta di tabella. Del tipo scrivere piu righe (record) con i loro argomenti.

    Tipo: (tipo matrice)

    riga1 nome1 cognome1 ....
    riga2 nome2 cognome2 ....
    riga3 nome3 cognome3 ....


    io provo con PUT e GET ma non ne vengo a capo.
    Aiutatemi x favore

    Grazie ciao Gng

  2. #2
    Utente di HTML.it
    Registrato dal
    Oct 2005
    Messaggi
    117
    Ciao, è facilissimo:

    codice:
    Dim NumFile As Integer
    
    Private Sub Command1_Click()
      'scrive i dati
      NumFile = FreeFile
      Open App.Path & "\prova.txt" For Output As #NumFile
      
      Print #NumFile, "¦riga1¦nome1¦cognome1¦"
      Print #NumFile, "¦riga2¦nome2¦cognome2¦"
      Print #NumFile, "¦riga3¦nome3¦cognome3¦"
      Print #NumFile, "¦riga4¦nome4¦cognome4¦"
    
      Close #NumFile
    
    End Sub
    
    
    Private Sub Command2_Click()
      'legge i dati
      Dim Stringa As String
      Dim Campi() As String
      Dim Ind As Integer
    
      
      NumFile = FreeFile
      Open App.Path & "\prova.txt" For Input As #NumFile
      
      Do While Not EOF(NumFile)
        DoEvents
        Line Input #NumFile, Stringa
        Campi = Split(Stringa, "¦")
        For Ind = 1 To UBound(Campi)
          'qui tratti i singoli campi
          Debug.Print Campi(Ind)
        Next Ind
      Loop
    
      Close #NumFile
    
    End Sub

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.