Mini bloc not

Soyez le premier à donner votre avis sur cette source.

Vue 3 871 fois - Téléchargée 210 fois

Description

Voila un petit programme qui permet d'ouvrire un fichier de modifier son contenu et de l' enregistrer

Source / Exemple :


Option Explicit
Dim CheminFichier As String
Dim a As Integer

Private Sub Command1_Click()
a = FreeFile
' *** Ecrire dans un fichier ***

' Open Ouvre le fichier contenu dans le commande dialogue
' OutPut Ouvre vide et remplie par la variable
' Append Ouvre rajoute le contenu de la variable

Open CheminFichier For Output As #a
    Print #a, MaTextBox.Text
Close #a

End Sub

Private Sub Command3_Click()
' ouverture de commande dialogue pour charger un fichier quelquonce
CommonDialog1.ShowOpen

' met le chemin renvoyer par le commande dialogue dans une variable declarer en genral
CheminFichier = CommonDialog1.FileName
Dim a As Long
a = FreeFile()

Open CheminFichier For Input As #a
'Inscrit le contenu du fichier dans un txtbox multiligne
     MaTextBox.Text = Input(LOF(a), a)
' ferme le fichier
Close #a
End Sub

Conclusion :


Fait vite fait pour le besoin d'un amis

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

dionysos6868
Messages postés
310
Date d'inscription
jeudi 4 septembre 2003
Statut
Membre
Dernière intervention
9 juin 2005
-
oui c'est tres basic mais c'est pour les debutant

Dim est pour declarer les variable oui bien que ce ne soit pas une obligation sous vb

Car si tu ne met pas

Option explicit dans le general tu n'a pas besoin de declarer tes varial mais mieux vaut le faire

As String est pour declarer que ta variable sera une chaine de caractere et As integer Signifi que ta variable sera numeric
cs_LordBob
Messages postés
2865
Date d'inscription
samedi 2 novembre 2002
Statut
Membre
Dernière intervention
11 mai 2009
8 -
c'est tres basic...
juki_webmaster
Messages postés
947
Date d'inscription
mercredi 19 novembre 2003
Statut
Membre
Dernière intervention
5 avril 2008
3 -
Eh je suis nul en Vbscript , a vrai dire jesaye de apprendre le maximun de language de programmation , mais peut tu mexpliquer ce qu'est :
Dim CheminFichier As String
Dim a As Integer

Dim c'est une declaration de variable ? quel difference entre As String et As Integer ?
crazyjoke
Messages postés
146
Date d'inscription
samedi 21 décembre 2002
Statut
Membre
Dernière intervention
9 janvier 2005
-
Je pense vraiment que l'on a pas besoin de ça içi...
ShadowMaster
Messages postés
184
Date d'inscription
mercredi 27 novembre 2002
Statut
Membre
Dernière intervention
18 août 2005
-
ba... c mini koi....
;)

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.