Bạn hiện đang ngoại tuyến, hãy chờ internet để kết nối lại

Làm thế nào để đọc từ và ghi vào một tập tin văn bản bằng cách sử dụng Visual Basic 2005 hoặc Visual Basic.NET

QUAN TRỌNG: Bài viết này được dịch bằng phần mềm dịch máy của Microsoft chứ không phải do con người dịch. Microsoft cung cấp các bài viết do con người dịch và cả các bài viết do máy dịch để bạn có thể truy cập vào tất cả các bài viết trong Cơ sở Kiến thức của chúng tôi bằng ngôn ngữ của bạn. Tuy nhiên, bài viết do máy dịch không phải lúc nào cũng hoàn hảo. Loại bài viết này có thể chứa các sai sót về từ vựng, cú pháp hoặc ngữ pháp, giống như một người nước ngoài có thể mắc sai sót khi nói ngôn ngữ của bạn. Microsoft không chịu trách nhiệm về bất kỳ sự thiếu chính xác, sai sót hoặc thiệt hại nào do việc dịch sai nội dung hoặc do hoạt động sử dụng của khách hàng gây ra. Microsoft cũng thường xuyên cập nhật phần mềm dịch máy này.

Nhấp chuột vào đây để xem bản tiếng Anh của bài viết này: 315828
Để một Microsoft Visual Basic 6,0 phiên bản của bài viết này, hãy xem 183638.
TÓM TẮT
Bài viết này chứng tỏ làm thế nào để đọc từ và ghi vào một tập tin văn bản bằng cách sử dụng Microsoft Visual Basic 2005 hoặc Microsoft Visual Basic.NET.

Yêu cầu

Danh sách sau vạch ra được đề nghị phần cứng, phần mềm, cơ sở hạ tầng mạng và gói bản ghi dịch vụ mà bạn cần:
  • Visual Basic 2005 hoặc Visual Basic.NET
Bài viết này giả định rằng bạn đã quen thuộc với các chủ đề sau:
  • Visual Basic 2005 hoặc Visual Basic.NET

Đọc và ghi tập tin văn bản

Các"Đọc một tập tin văn bản" phần chứng tỏ làm thế nào để sử dụng các đối tượng StreamReader để đọc một tập tin văn bản. Các"Viết một tập tin văn bản (ví dụ 1)"phần và các "Viết một tập tin văn bản (ví dụ 2)" phần chứng minh làm thế nào để sử dụng lớp StreamWriter để viết văn bản vào một tập tin.

Đọc một tập tin văn bản

Các mã sau đây sử dụng các lớp học StreamReader mở, đọc, và đóng tập tin văn bản. Bạn có thể vượt qua tên đường dẫn của một tập tin văn bản để các nhà xây dựng StreamReader để mở tập tin tự động. Phương pháp ReadLine lần đọc mỗi dòng văn bản và gia số con trỏ chỉ tệp tới dòng kế tiếp như nó đọc. Khi các phương pháp ReadLine đạt đến cuối cùng của tập tin, nó trở về không có gì.
  1. Bắt đầu Microsoft Visual Studio 2005 hoặc Microsoft Visual Studio.NET.
  2. Tạo một ứng dụng giao diện điều khiển mới trong Visual Basic 2005 hoặc Visual Basic .NET.
  3. Thêm mã sau vào phía trên của các tập tin Module1.vb:
    Imports System.IO					
  4. Thêm mã sau vào thủ tục Phụ chính .
    Dim objStreamReader As StreamReader    Dim strLine As String    'Pass the file path and the file name to the StreamReader constructor.    objStreamReader = New StreamReader("C:\Boot.ini")    'Read the first line of text.    strLine = objStreamReader.ReadLine    'Continue to read until you reach the end of the file.    Do While Not strLine Is Nothing      'Write the line to the Console window.      Console.WriteLine(strLine)      'Read the next line.      strLine = objStreamReader.ReadLine    Loop    'Close the file.    objStreamReader.Close()    Console.ReadLine()					
  5. Trên trình đơn gỡ lỗi , nhấp Bắt đầu để biên dịch bật lên và chạy các ứng dụng. Hãy bấm ENTER để đóng các Giao diện điều khiển cửa sổ.

    Cửa sổ giao diện điều khiển hiển thị tệp Boot.ini. Lưu ý nội dung của tệp Boot.ini có thể khác nhau từ cấu hình để cấu hình. Đầu ra sau đây là một tập tin Boot.ini mẫu:
    [boot loader]timeout=5default=multi(0)disk(0)rdisk(0)partition(1)\WINNT[operating systems]multi(0)disk(0)rdisk(0)partition(1)\WINNT="Windows 2000 Professional" /fastdetectC:\ = "Windows 98"						

Viết một tập tin văn bản (ví dụ 1)

Đoạn mã sau sử dụng các lớp học StreamWriter mở, để viết thư cho, và đóng tập tin văn bản. Tương tự như để StreamReader, bạn có thể vượt qua tên đường dẫn của một tập tin văn bản cho các nhà xây dựng StreamWriter để mở tập tin tự động. Phương pháp WriteLine viết một dòng đầy đủ của văn bản để các tập tin văn bản.
  1. Bắt đầu Visual Studio 2005 hoặc Visual Studio.NET.
  2. Tạo một ứng dụng giao diện điều khiển mới trong Visual Basic 2005 hoặc Visual Basic .NET.
  3. Thêm mã sau vào phía trên của Module1.vb:
    Imports System.IO					
  4. Thêm mã sau vào thủ tục Phụ chính :
    Dim objStreamWriter As StreamWriter       'Pass the file path and the file name to the StreamWriter constructor.   objStreamWriter = New StreamWriter("C:\Testfile.txt")   'Write a line of text.   objStreamWriter.WriteLine("Hello World")   'Write a second line of text.   objStreamWriter.WriteLine("From the StreamWriter class")   'Close the file.   objStreamWriter.Close()					
  5. Trên trình đơn gỡ lỗi , nhấp Bắt đầu để biên dịch bật lên và chạy các ứng dụng.

    Mã này tạo ra một tập tin tên Test.txt trên ổ C. mở Test.txt trong một biên tập văn bản như vậy như Notepad. Test.txt chứa hai dòng văn bản:
    Hello WorldFrom the StreamWriter class						

Viết một tập tin văn bản (ví dụ 2)

Đoạn mã sau sử dụng các lớp học StreamWriter mở, để viết thư cho, và đóng tập tin văn bản. Không giống như Ví dụ, mã này đi hai tham số bổ sung cho các nhà xây dựng.

Các tham số đầu tiên là đường dẫn tập tin và tập đã đặt tên tin của các tập tin. Các tham số thứ hai, đúng, xác định rằng các tập tin được mở ra trong phụ thêm chế độ. Nếu bạn chỉ rõ Sai cho tham số thứ hai, các nội dung của tập tin là ghi đè mỗi khi bạn chạy mã. Tham số thứ ba chỉ định Unicode để các StreamWriter mã hóa tập tin trong bảng mã Unicode. Bạn cũng có thể xác định như sau phương pháp mã hóa để tham số thứ ba:
  • ASCII
  • BigEndianUnicode
  • UTF7
  • UTF8
Viết phương pháp là tương tự như các phương pháp WriteLine ngoại trừ việc viết không tự động nhúng một trở về vận chuyển/đường dây nguồn dữ liệu thứ cấp (CR/LF) sự kết hợp của nhân vật. Điều này rất hữu ích khi bạn muốn viết một kí tự đại diện tại một thời gian.
  1. Bắt đầu Visual Studio 2005 hoặc Visual Studio.NET.
  2. Tạo một ứng dụng giao diện điều khiển mới trong Visual Basic 2005 hoặc Visual Basic .NET.
  3. Thêm mã sau vào phía trên của Module1.vb:
    Imports System.IOImports System.Text					
  4. Thêm mã sau vào các thủ tục Phụ chính dưới mã hiện tại của bạn:
    Dim objStreamWriter As StreamWriter   Dim x As Long       'Open the file.   objStreamWriter = New StreamWriter("C:\Test2.txt", True, _      Encoding.Unicode)   'Write out the numbers 1 through 10 on the same line.   For x = 1 To 10     objStreamWriter.Write(x)   Next x       'Close the file.   objStreamWriter.Close()					
  5. Trên trình đơn gỡ lỗi , nhấp Bắt đầu để biên dịch bật lên và chạy các ứng dụng.

    Mã này tạo ra một tập tin được đặt tên theo Test2.txt trên ổ C. mở Test2.txt trong một biên tập văn bản như vậy như Notepad. Test2.txt có một dòng văn bản:
    12345678910							
    Lưu ý Nếu bạn chạy mã nhiều lần, các văn bản "123456789" là lặp đi lặp lại trên cùng một dòng.

Danh sách mã hoàn chỉnh

'Read a Text FileImports System.IOModule Module1    Sub Main()        Dim objStreamReader As StreamReader        Dim strLine As String        'Pass the file path and the file name to the StreamReader constructor.        objStreamReader = New StreamReader("C:\Boot.ini")        'Read the first line of text.        strLine = objStreamReader.ReadLine        'Continue to read until you reach the end of the file.        Do While Not strLine Is Nothing            'Write the line to the Console window.            Console.WriteLine(strLine)            'Read the next line.            strLine = objStreamReader.ReadLine        Loop        'Close the file.        objStreamReader.Close()        Console.ReadLine()    End SubEnd Module'Write a Text File: Version 1Imports System.IOModule Module1    Sub Main()        Dim objStreamWriter As StreamWriter        'Pass the file path and the file name to the StreamWriter constructor.        objStreamWriter = New StreamWriter("C:\Text.txt")        'Write a line of text.        objStreamWriter.WriteLine("Hello World")        'Write a second line of text.        objStreamWriter.WriteLine("From the StreamWriter class")        'Close the file.        objStreamWriter.Close()    End SubEnd Module'Write a Text File: Version 2Imports System.IOImports System.TextModule Module1    Sub Main()        Dim objStreamWriter As StreamWriter        Dim x As Long        'Open the file.        objStreamWriter = New StreamWriter("C:\Test2.txt", True, _           Encoding.Unicode)        'Write out the numbers 1 through 10 on the same line.        For x = 1 To 10            objStreamWriter.Write(x)        Next x        'Close the file.        objStreamWriter.Close()    End SubEnd Module				

Giải đáp thắc mắc

Bất cứ khi nào bạn đầu vào hoặc đầu ra một tập tin, rất tốt lập trình thực hành để bọc các mã bên trong một khối Thử-cuối cùng-thử trong trường hợp xảy ra một lỗi. Một số hiệu lỗi có thể bao gồm một tập tin không tồn tại, hoặc một tập tin mà đang được dùng.
THAM KHẢO
Để biết thêm chi tiết, hãy truy cập web site Microsoft sau đây các trang web:
Hãy thử... kết thúc... thử

Cảnh báo: Bài viết này được dịch tự động

Thuộc tính

ID Bài viết: 315828 - Xem lại Lần cuối: 06/07/2012 12:52:00 - Bản sửa đổi: 4.0

Microsoft Visual Basic 2005, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbvs2005swept kbvs2005applies kbhowtomaster kbmt KB315828 KbMtvi
Phản hồi
tml>