Module
Contents
Index 🔎︎

# Line Input # Statement

একটি ধারাবাহিক ফাইল থেকে ভেরিয়েবলে স্ট্রিং পড়া হয়।

## সিনট্যাক্স:

    Line Input #FileNumber As Integer, Var As String

## প্যারামিটার:

FileNumber: ডাটা ধারণকারী ফাইলের সংখ্যা যা আপনি পড়তে চান। ওপেন স্টেটমেন্ট সহ ফাইলটি INPUT কীওয়ার্ড ব্যবহার করে অবশ্যই অগ্রিম খোলা হয়েছে।

var: ভেরিয়েবলটির নাম যা ফলাফল সংরক্ষণ করে থাকে।

Line Input# স্টেটমেন্ট সহ, আপনি একটি খোলা ফাইল থেকে একটি ভেরিয়েবলে ষ্ট্রিং পড়তে পারবেন। প্রথম ক্যারেজ প্রদান (Asc=13) অথবা লাইনফিড (Asc=10) পর্যন্ত ষ্ট্রিং ভেরিয়েবল লাইনের পর লাইন পড়া হয়। ফলাফলের স্ট্রিং এ লাইন সমাপ্তি চিহ্ন অন্তর্ভূক্ত থাকে না।

## উদাহরণ:

    Sub ExampleWorkWithAFile

    Dim iNumber As Integer

    Dim sLine As String

    Dim aFile As String

    Dim sMsg As String

        aFile = "c:\data.txt"

        iNumber = Freefile

        Open aFile For Output As #iNumber

        Print #iNumber, "This is a line of text"

        Print #iNumber, "This is another line of text"

        Close #iNumber

        iNumber = Freefile

        Open aFile For Input As iNumber

        While Not EOF(iNumber)

            Line Input #iNumber, sLine

            If sLine <>"" Then

                sMsg = sMsg & sLine & chr(13)

            End If

        Wend

        Close #iNumber

        MsgBox sMsg

    End Sub