HOW TO READ FROM A TEXT FILE USING VISUAL BASIC 2008 (VB 2008)
DESCRIPTION
This Visual Basic 2008 code is a simple source code example of reading from a
TEXT file using
Visual
Basic 2008.
|
THE VB2008 SETUP
Add the following lines to your 'Module1' code (add the Imports as the first
lines above Module1 - ie at the very top!)
Imports System
Imports System.IO
Imports System.Collections
Module 1:
Public MyFileName As String
Public MyNewLine(1000) As String
|
THE FREE VISUAL BASIC 2008 VB 2008 SOURCE CODE
Copy and Paste this code wherever you need it:
'.....Free Source Code from www.freevisualbasic2008sourcecode.com
'.....Note that MyFileName should include the path to be safe
MyFileName="c:\myfile.txt"
'.....Open the file
'.....Note that the first parameter assigns a file number, the second parameter
specifies the file to open and the third specifies the File Open Mode - ie
Input =
read mode
FileOpen(1, OpenFileDialog1.MyFileName, _OpenMode.Input)
'.....Now read the line(s) of text from the file until End of File (EOF) is
reached
z=0
'.....Start the counter at zero
'.....Read the line of data (READ TEXT)
Do Until EOF(1)
MyNewLine(z) = LineInput(1)
z=z+1
'.....increment the counter
Loop
'.....An array of text strings has been created each line of the array holds a
line from the text file..
'.....Close the file
FileClose(1)
|
|
