خواندن يک فايل و پرينت گرفتن از يک فايل

سلام
يه فايلي هست که تقريباً 10 تا 20 خط داره . مي خوام اون فايل رو بخونم و بعد هر خط رو توي يک صفحه چاپ کنم ( توي يک کاغذ a4) . اگه ميشه راهنمايي کنيد . چون نمي دونم چي کار کنم. اگرم ميشه کد بذاريد . ممنون

اگه منظورت یک فایل تکست هست میتونید با دستور open اون رو باز کنید سپس با دستور input اون رو تو یک متغیر بریزید و بعد هر کدام از این متغیرها رو (خط ها رو)چاپ کنید

کد:

---

Open txtfile For Input As #1

    While Not EOF(1)

Line Input #1, strcol
 دستور پرینت متغیر strcol
Wend
Close

---

در اخر هم با close فایل تکست رو میبندی
برای اون قسمت پرینت هم از Printer.Print استفاده کن
البته سورس رو کامل نذاشتم که یاد بگیری سوالی پیش اومد در خدمتیم مشکلی نیست