Connexion
S'inscrire
Actualités
Quoi de neuf
Activités générales
Auteurs
Forums
Nouveaux messages
Rechercher un forum
Wiki
Pages
Dernière activité
Quoi de neuf
Nouveaux messages
Nouveaux articles
Nouveaux messages de profil
Activités générales
Membres
Membres inscrits
Visiteurs actuels
Nouveaux messages de profil
Rechercher dans les messages des profils
Teams
Créé ton équipe
Magasin
Quoi de neuf ?
Nouveaux messages
Rechercher un forum
Menu
Connexion
S'inscrire
Install the app
Install
Forums
Forums généraux
Informatique
[VB.NET] Créer un logiciel de traitement de texte
JavaScript is disabled. For a better experience, please enable JavaScript in your browser before proceeding.
Vous utilisez un navigateur non à jour ou ancien. Il ne peut pas afficher ce site ou d'autres sites correctement.
Vous devez le mettre à jour ou utiliser un
navigateur alternatif
.
Répondre à la discussion
Message
<blockquote data-quote="Paradise GTP" data-source="post: 2582043" data-attributes="member: 300598"><p style="text-align: center">[ATTACH=full]11520[/ATTACH]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>H</strong>ello, on ce retrouve pour un tutoriel.</p> <p style="text-align: center"><strong>D</strong>onc voila l'interface du logiciel</p> <p style="text-align: center"></p> <p style="text-align: center">[ATTACH=full]11521[/ATTACH]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>onc vous aurez besoin de mettre :</p> <p style="text-align: center">- Une textBox</p> <p style="text-align: center">- Un menustrip</p> <p style="text-align: center">- Un label</p> <p style="text-align: center">- Un SaveFileDialog</p> <p style="text-align: center">- Un OpenFileDialog</p> <p style="text-align: center">- Un ColorDialog</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>ans le menu strip :</p> <p style="text-align: center"><strong>L</strong>e menu Fichier avec dedans :</p> <p style="text-align: center">- Nouveau</p> <p style="text-align: center">- Enregistrer</p> <p style="text-align: center">- Imprimer</p> <p style="text-align: center">- Ouvrir</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>L</strong>e menu Police avec dedans :</p> <p style="text-align: center">- Police</p> <p style="text-align: center">- Couleur</p> <p style="text-align: center">- Alignement</p> <p style="text-align: center">Avec dans le menu alignement :</p> <p style="text-align: center">Droite</p> <p style="text-align: center">Gauche</p> <p style="text-align: center">Centré</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>V</strong>oila <img src="/data/assets/smilies/espion.gif" class="smilie" loading="lazy" alt=":espion:" title="Espion :espion:" data-shortname=":espion:" /></p> <p style="text-align: center"></p> <p style="text-align: center"><strong>A</strong>vant tous importer sa :</p> <p style="text-align: center">[CODE][/CENTER]</p> <p style="text-align: center">Imports System.IO</p> <p style="text-align: center">Imports System.Drawing.Font</p> <p style="text-align: center">Imports System.Drawing.Printing</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center">[ATTACH=full]11522[/ATTACH]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>P</strong>rogrammation du SaveFileDialog et OpenFileDialog sont les même :</p> <p style="text-align: center">Filter :</p> <p style="text-align: center">[CODE]</p> <p style="text-align: center">Fichier Texte|".txt</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>onc le bouton nouveau :</p> <p style="text-align: center">[CODE]</p> <p style="text-align: center"> TextBox1.Text = ""</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>ans le bouton Ouvrir :</p> <p style="text-align: center">[CODE][/CENTER]</p> <p style="text-align: center"> If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then</p> <p style="text-align: center"> Dim SR As New StreamReader(OpenFileDialog1.FileName)</p> <p style="text-align: center"> TextBox1.Text = SR.ReadToEnd</p> <p style="text-align: center"> SR.Close()</p> <p style="text-align: center"> End If</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>ans le bouton enregistrer :</p> <p style="text-align: center">[CODE]</p> <p style="text-align: center"> If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then</p> <p style="text-align: center"></p> <p style="text-align: center"> Dim SW As New StreamWriter(SaveFileDialog1.FileName)</p> <p style="text-align: center"> SW.Write(TextBox1.Text)</p> <p style="text-align: center"> SW.Close()</p> <p style="text-align: center"> End If</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>ans le bouton imprimer :</p> <p style="text-align: center">[CODE]</p> <p style="text-align: center"> Try</p> <p style="text-align: center"> Dim PrintDoc As New PrintDocument</p> <p style="text-align: center"> AddHandler PrintDoc.PrintPage, AddressOf Me.PrintText</p> <p style="text-align: center"> PrintDoc.Print()</p> <p style="text-align: center"> Catch ex As Exception</p> <p style="text-align: center"> MessageBox.Show("Désolé nous ne pouvons pas imprimer ce doccument", ex.ToString())</p> <p style="text-align: center"> End Try</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>ans le bouton couleur :</p> <p style="text-align: center">[CODE]</p> <p style="text-align: center"> If ColorDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then</p> <p style="text-align: center"> TextBox1.ForeColor = ColorDialog1.Color</p> <p style="text-align: center"> End If</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>ans le bouton Police :</p> <p style="text-align: center">[CODE]</p> <p style="text-align: center"> Dim instance As New FontDialog</p> <p style="text-align: center"> instance.ShowDialog()</p> <p style="text-align: center"> TextBox1.Font = instance.Font</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>ans le bouton centré :</p> <p style="text-align: center">[CODE]</p> <p style="text-align: center"> TextBox1.TextAlign = HorizontalAlignment.Center</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>ans le bouton droite:</p> <p style="text-align: center">[CODE]</p> <p style="text-align: center"> TextBox1.TextAlign = HorizontalAlignment.Right</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>D</strong>ans le bouton droite:</p> <p style="text-align: center">[CODE]</p> <p style="text-align: center"> TextBox1.TextAlign = HorizontalAlignment.Left</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>E</strong>t pour finir dans la textBox :</p> <p style="text-align: center">[CODE]</p> <p style="text-align: center"> Label1.Text = Len(TextBox1.Text) & " caractères"</p> <p style="text-align: center">[/CODE]</p> <p style="text-align: center"></p> <p style="text-align: center"><strong>V</strong>oila ces codes ne sont pas que pour un traiteur de texte, vous pouvez les utilisez pour tout autre choses</p> <p style="text-align: center"></p> <p style="text-align: right"><strong>T</strong>utoriel écrit, screen 100% by Boosterz.</p> <p style="text-align: right"><span style="color: #ff0000"><strong>Le copié collé est strictement INTERDIT</strong></span></p> <p style="text-align: right"><strong>C</strong>ordialement,</p> <p style="text-align: right"><span style="color: #ff8000"><strong>B</strong>oosterz GTP</span></p></blockquote><p></p>
[QUOTE="Paradise GTP, post: 2582043, member: 300598"] [CENTER][ATTACH=full]11520[/ATTACH] [B]H[/B]ello, on ce retrouve pour un tutoriel. [B]D[/B]onc voila l'interface du logiciel [ATTACH=full]11521[/ATTACH] [B]D[/B]onc vous aurez besoin de mettre : - Une textBox - Un menustrip - Un label - Un SaveFileDialog - Un OpenFileDialog - Un ColorDialog [B]D[/B]ans le menu strip : [B]L[/B]e menu Fichier avec dedans : - Nouveau - Enregistrer - Imprimer - Ouvrir [B]L[/B]e menu Police avec dedans : - Police - Couleur - Alignement Avec dans le menu alignement : Droite Gauche Centré [B]V[/B]oila :espion: [B]A[/B]vant tous importer sa : [CODE][/CENTER] Imports System.IO Imports System.Drawing.Font Imports System.Drawing.Printing [/CODE] [ATTACH=full]11522[/ATTACH] [B]P[/B]rogrammation du SaveFileDialog et OpenFileDialog sont les même : Filter : [CODE] Fichier Texte|".txt [/CODE] [B]D[/B]onc le bouton nouveau : [CODE] TextBox1.Text = "" [/CODE] [B]D[/B]ans le bouton Ouvrir : [CODE][/CENTER] If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then Dim SR As New StreamReader(OpenFileDialog1.FileName) TextBox1.Text = SR.ReadToEnd SR.Close() End If [/CODE] [B]D[/B]ans le bouton enregistrer : [CODE] If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then Dim SW As New StreamWriter(SaveFileDialog1.FileName) SW.Write(TextBox1.Text) SW.Close() End If [/CODE] [B]D[/B]ans le bouton imprimer : [CODE] Try Dim PrintDoc As New PrintDocument AddHandler PrintDoc.PrintPage, AddressOf Me.PrintText PrintDoc.Print() Catch ex As Exception MessageBox.Show("Désolé nous ne pouvons pas imprimer ce doccument", ex.ToString()) End Try [/CODE] [B]D[/B]ans le bouton couleur : [CODE] If ColorDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then TextBox1.ForeColor = ColorDialog1.Color End If [/CODE] [B]D[/B]ans le bouton Police : [CODE] Dim instance As New FontDialog instance.ShowDialog() TextBox1.Font = instance.Font [/CODE] [B]D[/B]ans le bouton centré : [CODE] TextBox1.TextAlign = HorizontalAlignment.Center [/CODE] [B]D[/B]ans le bouton droite: [CODE] TextBox1.TextAlign = HorizontalAlignment.Right [/CODE] [B]D[/B]ans le bouton droite: [CODE] TextBox1.TextAlign = HorizontalAlignment.Left [/CODE] [B]E[/B]t pour finir dans la textBox : [CODE] Label1.Text = Len(TextBox1.Text) & " caractères" [/CODE] [B]V[/B]oila ces codes ne sont pas que pour un traiteur de texte, vous pouvez les utilisez pour tout autre choses [/CENTER] [RIGHT][B]T[/B]utoriel écrit, screen 100% by Boosterz. [COLOR=#ff0000][B]Le copié collé est strictement INTERDIT[/B][/COLOR] [B]C[/B]ordialement, [COLOR=#ff8000][B]B[/B]oosterz GTP[/COLOR][/RIGHT] [/QUOTE]
Insérer les citations…
Vérification
Publier la réponse
Forums
Forums généraux
Informatique
[VB.NET] Créer un logiciel de traitement de texte
Ce site utilise des cookies. En continuant à utiliser ce site, vous acceptez l'utilisation des cookies.
Acceptez
En savoir plus.…
Haut