PDA

View Full Version : مشکل در کار کردن با فایل و چاپ



mahan.net
جمعه 31 خرداد 1387, 17:43 عصر
سلام دوستان
من تو کد نویسی تازه کار هستم می خواستم یک برنامه بنویسم که یک فایل تکست رو که یک سری شماره سریال (در هر سطر یکی) هست روبعد از browse کردن این فایل بخوانم و در """"""نمیدونم چی ذخیره کنم """"""و سپس پرینت کنم.(پرینت به صورتی هستش که توی هر صفحه پرینت یک سریال سه مرتبه چاپ شود.
خیلی عجله ای هستش ممنون میشم راهنماییم کنید.
تا الانم این رو درست کردم

Private Sub Command1_Click()

End Sub

Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub

Private Sub File1_Click()
Text1.Text = File1.FileName
End Sub

Private Sub Form_Load()

End Sub