كيفية القيام بما يلي: قراءة نص من ملف.
توضح أمثلة التعليمات البرمجية التالية كيفية قراءة نص من ملف نصي. يقوم المثال الثاني بإعلامك عند يتم الوصول إلي نهاية الملف. يمكن أيضاً الحصول هذه الوظيفة عن طريق استخدام الأساليب ReadAllLines أو ReadAllText.
مثال
Imports System
Imports System.IO
Class Test
Public Shared Sub Main()
Try
' Create an instance of StreamReader to read from a file.
Using sr As StreamReader = New StreamReader("TestFile.txt")
Dim line As String
' Read and display the lines from the file until the end
' of the file is reached.
Do
line = sr.ReadLine()
Console.WriteLine(Line)
Loop Until line Is Nothing
End Using
Catch E As Exception
' Let the user know what went wrong.
Console.WriteLine("The file could not be read:")
Console.WriteLine(E.Message)
End Try
End Sub
End Class
using System;
using System.IO;
class Test
{
public static void Main()
{
try
{
// Create an instance of StreamReader to read from a file.
// The using statement also closes the StreamReader.
using (StreamReader sr = new StreamReader("TestFile.txt"))
{
String line;
// Read and display lines from the file until the end of
// the file is reached.
while ((line = sr.ReadLine()) != null)
{
Console.WriteLine(line);
}
}
}
catch (Exception e)
{
// Let the user know what went wrong.
Console.WriteLine("The file could not be read:");
Console.WriteLine(e.Message);
}
}
}
Option Explicit On
Option Strict On
Imports System
Imports System.IO
Public Class TextFromFile
Private Const FILE_NAME As String = "MyFile.txt"
Public Shared Sub Main()
If Not File.Exists(FILE_NAME) Then
Console.WriteLine("{0} does not exist.", FILE_NAME)
Return
End If
Using sr As StreamReader = File.OpenText(FILE_NAME)
Dim input As String
input = sr.ReadLine()
While Not input Is Nothing
Console.WriteLine(input)
input = sr.ReadLine()
End While
Console.WriteLine("The end of the stream has been reached.")
End Using
End Sub
End Class
using System;
using System.IO;
public class TextFromFile
{
private const string FILE_NAME = "MyFile.txt";
public static void Main(String[] args)
{
if (!File.Exists(FILE_NAME))
{
Console.WriteLine("{0} does not exist.", FILE_NAME);
return;
}
using (StreamReader sr = File.OpenText(FILE_NAME))
{
String input;
while ((input=sr.ReadLine())!=null)
{
Console.WriteLine(input);
}
Console.WriteLine ("The end of the stream has been reached.");
}
}
برمجة نشطة
ينشئ هذا الرمز على StreamReaderيشير ذلك إلى MyFile.txtمن خلال استدعاء File.OpenText. StreamReader.ReadLineتقوم بإرجاع كل خط كسلسلة. عندما لا يكون هناك المزيد من الأحرف للقراءة، فسيتم عرض رسالة تدل علي هذا التأثير، ويتم غلق الدفق.
ملاحظة |
---|
قد يختار المستخدمون Visual أساسى إلى استخدام الوظائف والخصائص التي يوفرها FileSystemفئة لملف الادخال/الاخراج. |
راجع أيضًا:
المهام
كيفية القيام بما يلي: إنشاء سرد الدليل
كيفية القيام بما يلي: القراءة والكتابة إلى ملف مُنشأ حديثاً
كيفية القيام بما يلي: افتح ثم إلحاق ملف سجل
كيفية القيام بما يلي: كتابة نص في ملف
كيفية القيام بما يلي: قراءة الأحرف من سلسلة
كيفية القيام بما يلي: كتابة الأحرف في سلسلة