Siebel VB Language Reference > VB Language Reference >

Input Statement

This standard VB statement reads data from a sequential file and assigns the data to variables.


Input [#]filenumber, variable[, variable]...



The file number used in the Open statement to open the file from which to read


One or more variables to contain the values read from the file


Not applicable


The filenumber is the number used in the Open statement to open the file. The list of variables is separated by commas.


This example prompts a user for an account number, opens a file, searches for the account number, and displays the matching letter for that number. It uses the Input statement to increase the value of x and at the same time get the letter associated with each value. The second subprogram, CreateFile, creates the file c:\temp001 used by the main subprogram.

(general) (declarations)
Option Explicit
Declare Sub CreateFile

Global x as Integer
Global y(100) as String

Sub CreateFile
' Put the numbers 1-10 and letters A-J into a file
   Dim startletter
   Open "c:\temp001" for Output as #1
   startletter = 65
   For x = 1 to 10
      y(x) = Chr(startletter)
      startletter = startletter + 1
   Next x
   For x = 1 to 10
      Write #1, x,y(x)
   Next x
   Close #1
End Sub

Sub Button2_Click
   Dim acctno as Integer
   Dim msgtext
   Call CreateFile
start: acctno = 2
   If acctno<1 Or acctno>10 then
      Goto start:
   End if
   x = 1
   Open "c:\temp001" for Input as #1
   Do Until x = acctno
      Input #1, x,y(x)
      msgtext = "The letter for account number " & x & " is: " _
         & y(x)
   Close #1
      Kill "C:\TEMP001"
End Sub

See Also

Get Statement
Input Function
Line Input Statement
Open Statement
Write Statement

Siebel VB Language Reference