مشاركة عبر


كيفية القيام بما يلي: كتابة نص في ملف

يلي مثال يوضح كيفية كتابة نص إلى ملف نصي. يقوم بقراءة الجميع ملفات نصية من المجلد مستندات للمستخدم باستخدام "*.txt"نمط بحث، و لهم بالكتابة إلى ملف نصي كبير.

ملاحظةملاحظة

قد يختار المستخدمون Visual أساسى إلى استخدام الوظائف والخصائص التي يوفرها Microsoft.VisualBasic.FileIO.FileSystemفئة لملف الادخال/الاخراج.

مثال

Imports System
Imports System.IO
Imports System.Text
Imports System.Collections.Generic

Class Program

    Public Shared Sub Main(ByVal args As String())

        Dim mydocpath As String = _
        Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
        Dim sb As New StringBuilder()

        For Each txtName As String _
            In Directory.EnumerateFiles(mydocpath, "*.txt")
            Using sr As New StreamReader(txtName)
                sb.AppendLine(txtName.ToString())
                sb.AppendLine("= = = = = =")
                sb.Append(sr.ReadToEnd())
                sb.AppendLine()
                sb.AppendLine()

            End Using
        Next

        Using outfile As New StreamWriter(mydocpath & "\AllTxtFiles.txt")
            outfile.Write(sb.ToString())
        End Using
    End Sub
End Class
using System;
using System.IO;
using System.Text;
using System.Collections.Generic;

class Program
{

    static void Main(string[] args)
    {

        string mydocpath = 
            Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments);
        StringBuilder sb = new StringBuilder();

        foreach (string txtName in Directory.EnumerateFiles(mydocpath,"*.txt"))
        {
            using (StreamReader sr = new StreamReader(txtName))
            {
                sb.AppendLine(txtName.ToString());
                sb.AppendLine("= = = = = =");
                sb.Append(sr.ReadToEnd());
                sb.AppendLine();
                sb.AppendLine();
            }

        }

        using (StreamWriter outfile = 
            new StreamWriter(mydocpath + @"\AllTxtFiles.txt"))
        {
            outfile.Write(sb.ToString());
        }
    }
}

راجع أيضًا:

المهام

كيفية القيام بما يلي: إنشاء سرد الدليل

كيفية القيام بما يلي: القراءة والكتابة إلى ملف مُنشأ حديثاً

كيفية القيام بما يلي: افتح ثم إلحاق ملف سجل

كيفية القيام بما يلي: قراءة نص من ملف.

كيفية القيام بما يلي: قراءة الأحرف من سلسلة

كيفية القيام بما يلي: كتابة الأحرف في سلسلة

المرجع

StreamWriter

File.CreateText

المبادئ

ملفات I/O الأساسية