Input# Statement

ཁ་ཕྱེ་བའི་གོ་རིམ་ཡིག་ཆ་ནས་གཞི་གྲངས་ཀློག་འདོན་བྱེད།

Syntax:

Input Statement diagram


Input #fileNum {,|;} var1 [, var2 [, ...]]

Parameters:

fileNum: Number of the file that contains the data that you want to read. The file must be opened with the Open statement using the key word INPUT.

var: A numeric or string variable that you assign the values read from the opened file to.

Input# རྗོད་པ་ནི་ཁ་ཕྱེ་བའི་ཡིག་ཆའི་ནང་གྲངས་ཐང་ངམ་ཡིག་རྟགས་ཕྲེང་ཀློག་འདོན་བྱེད་པ་མ་ཟད་གཞི་གྲངས་འདི་དག་འགྱུར་ཚད་གཅིག་གམ་མང་པོར་གཏན་འཁེལ་བྱེད། གྲངས་ཀའི་འགྱུར་ཚད་ཀློག་འདོན་བརྒྱུད་རིམ་ལ་Enterམཐེབ་ཨང་དང་པོ་དང་ (Asc=13)ཕྲེང་བརྗེ་ (Asc=10)སྟོང་མིག་གམ་མཚམས་རྟགས་ཐུག་དུས་མཚམས་འཇོག་བྱེད་ ཡིག་རྟགས་ཕྲེང་བ་འགྱུར་ཚད་ཀྱི་བརྒྱུད་རིམ་ཀློག་འདོན་ལ་Enterམཐེབ་ (Asc=13)ཕྲེང་བརྗེ་ (Asc=10) འམ་མཚམས་རྟགས་འཕྲད་དུས་མཚམས་འཇོག་བྱེད།

ཁ་ཕྱེ་བའི་ཡིག་ཆའི་ནང་གཞི་གྲངས་དང་གཞི་གྲངས་རིགས་ཀྱི་ཐོན་པའི་གོ་རིམ་ནི་ངེས་པར་དུ་ "var" ཞུགས་གྲངས་ནང་འགྱུར་ཚད་ཀྱི་བརྒྱུད་སྐྱེལ་གོ་རིམ་དང་མཚུངས་དགོས། གལ་ཏེ་གྲངས་ཀའི་རིགས་མིན་པའི་ཐང་གྲངས་ཀའི་འགྱུར་ཚད་ཅིག་གཏན་འཁེལ་བྱས་ན་"var" ནི་ "0"ལ་གཏན་འཁེལ་བྱེད་དགོས།

མཚོན་རྟགས་ཀྱིས་བར་བཅད་པའི་ཟིན་བྲིས་ལ་མཚམས་རྟགས་ཡིག་རྟགས་ཕྲེང་འགྱུར་ཚད་ལ་གཏན་འཁེལ་མི་བྱེད། གཞན་ཡང་ ཡིག་ཆའི་ནང་གི་འདྲེན་རྟགས་ (") ཀྱང་སྣང་མེད་བྱེད། གལ་ཏེ་ཡིག་ཆའི་ནང་གི་ཡིག་རྟགས་འདི་དག་ཀློག་འདོན་བྱེད་ན་ Line Input# སྤྱད་ནས་རྗོད་པ་ཕྲེང་རེ་རེ་བཞིན་ཡིག་དེབ་རྐྱང་པའི་ཡིག་ཆ་ཀློག་འདོན་བྱེད་(གཏག་པར་ཡིག་རྟགས་ཀྱི་ཡིག་ཆ་ཁོ་ན་) །

གལ་ཏེ་གཞི་གྲངས་གཞི་རྒྱུ་ཀློག་ལེན་བྱེད་དུས་ཡིག་ཆའི་མཇུག་ཏུ་སླེབས་དུས་ནོར་འཁྲུལ་ཐོན་ན་འཕེལ་རིམ་རྒྱུན་གཏན་མིན་པའི་མཚམས་འཇོག་བྱེད།

Example:


Sub ExampleWorkWithAFile
    Dim iCount As Integer, sFileName As String
    Dim sName As String, sValue As Integer
    sFileName = "C:\Users\ThisUser\data.txt"
    iCount = Freefile
    ' Write data ( which we will read later with Input ) to file
    Open sFileName For Output As iCount
    sName = "Hamburg" : sValue = 200
    Write #iCount, sName, sValue
    sName = "New York" : sValue = 300
    Write #iCount; sName, sValue
    sName = "Miami" : sValue = 459
    Write #iCount, sName, sValue
    Close #iCount
    ' Read data file using Input
    iCount = Freefile
    Open sFileName For Input As iCount
    Input #iCount, sName, sValue
    MsgBox sName & " " & sValue
    Input #iCount; sName, sValue
    MsgBox sName & " " & sValue
    Input #iCount, sName, sValue
    MsgBox sName & " " & sValue
    Close #iCount
End Sub