دستور نوشتن فايل*******'
Open "C:\Sample.TXT" For OutPut As #1

Print #1,"Amir"

Close #1

دستور بازكردن فايل*******'

Open "C:\Sample.Txt" For Input As #1

(Do While Not Eof(1

Input #1,A

 List1.AddItem A

Loop

Close #1

 




ورود کاربران

خوش آمدید! لطفا وارد حساب خود شوید

رمز عبور را فراموش کرده‌اید؟
حساب کاربری ندارید؟

فراموشی رمز عبور

نام کاربری یا ایمیل خود را وارد کنید

یا

ثبت نام کاربران

در چند ثانیه حساب کاربری خود را بسازید

قبلا ثبت نام کرده‌اید؟

نظرات کاربران

دیدگاه خود را با ما در میان بگذارید