Lecture d'un fichier texte - tableau 1 dimension - inscription du fichier dans un textbox

Commenter

Contenu du snippet

J'ai cherché un code simple pour lire un fichier texte, le mettre dans un tableau pour mon Pocket PC. Voici un petit bout de code faisant cela.
En plus, j'ai mis le code pour l'affichier dans un textbox

Source / Exemple : 


Imports System.IO
Public Class Form1

Public AppPath As String = System.IO.Path.GetDirectoryName(System.Reflection.Assembly.GetExecutingAssembly.GetName.CodeBase)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim FichierTexte As String
        Dim i As Integer
        Dim Tableau(0) As String
        Try
            Dim ObjetFichier As StreamReader = New StreamReader(AppPath & "\Coord.txt")

            Do
                FichierTexte = ObjetFichier.ReadLine()

                If FichierTexte Is Nothing Then
                    i = i - 1
                Else
                    If i = 0 Then
                        ReDim Tableau(i)
                    Else
                        ReDim Preserve Tableau(i)
                    End If
                    Tableau(i) = FichierTexte
                End If

                If i = 0 Then
                    TextBox1.Text = Tableau(i)
                Else
                    TextBox1.Text = TextBox1.Text & vbCrLf & Tableau(i) 'vbCrLf = Changement de ligne
                End If
                i = i + 1
            Loop Until FichierTexte Is Nothing
            ObjetFichier.Close()
            i = i - 1
        Catch exc As Exception
            MsgBox("Fichier inexistant")
        End Try

    End Sub
End Class

Conclusion :


Une partie de ce code est tiré du Livre pour programmer pour un PocketPC
http://www.pdafr.com/livre-pocket-pc-developpez-vos-jeux-utilitaires-avec-vb-14162.aspx

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.