Siebel VB Language Reference > VB Language Reference >
Line Input Statement
This standard VB statement reads a line from a sequential file into a string variable. Syntax A
Line Input [#] filenumber, varName Syntax B
Line Input [prompt,] varName
|
|
filenumber |
The file number, given in the Open statement, of the open file from which to read |
varName |
A string variable into which a line of data or user input is to be read |
prompt |
A string literal prompting for keyboard input |
Returns
Not applicable Usage
If it is included, the filenumber is the number used in the Open statement to open the file. If filenumber is not provided, the line is read from the keyboard. If prompt is not provided, a question mark (?) is displayed as the prompt. Line Input is used to read lines of text from a text file in which the data elements are separated by carriage returns. To read data from a file of comma-separated values, use Read. Example
This example reads the contents of a sequential file line by line (to a carriage return) and displays the results. The second subprogram, CreateFile , creates the file C:\temp001 used by the main subprogram. (general) (declarations) Option Explicit Declare Sub CreateFile
Sub CreateFile Rem Put the numbers 1-10 into a file Dim x as Integer Open "c:\temp001" for Output as #1 For x = 1 to 10 Write #1, x Next x Close #1 End Sub
Sub Button_Click Dim testscore as String Dim x Dim y Dim newline Call CreateFile Open "c:\temp001" for Input as #1 x = 1 newline = Chr(10) msgtext = "The contents of c:\temp001 is: " & newline Do Until x = Lof(1) Line Input #1, testscore x = x + 1 y = Seek(1) If y>Lof(1) then x = Lof(1) Else Seek 1,y End If msgtext = msgtext & testscore & newline Loop Close #1 Kill "c:\temp001" End Sub
Related Topics
Get Statement Input Function Input Statement Open Statement
|