منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - مشكلة في كود القراءة والكتابه في الملف النصي

السلام عليكم
قمت بعمل تمرين صغير يقوم بحفظ توقيت في ملف نصي ومن ثم استعاءه ولكن المشكلة انه في كل مره أقوم بحفظ يقوم البرانامج بزيادة فراغات في الملف النصي وبعد فتره يتوقف البرنامج عن العمل فلا يعمل إلا اذا قمت بحذف الأسطر الفارغة من الملف النصي
الكود هو

PHP كود :

Private Sub Text4_LostFocus()
Open App.Path & "\txt4.txt" For Output As #1
Print #1, Text4.Text
Close #1
End Sub 

والكود الثاني

PHP كود :

Open App.Path & "\txt4.txt" For Input As #1
Text4.Text = Input(LOF(1), 1)
Close #1 

أرجو المساعدة

وعندي طلب ثاني
عندي أكثر من تكست بوكس مشروعي الأن يقوم بحفظ الوقت الموجود في كل تكست بملف نصي أريد أن أحفظ جميع الأوقت في نفس الملف
فمثلا: تكست يوكس 1 واحد يحفظ الوقت في الملف النصي افي السطر الأول
تكست بوكس 2 يحفظ الوقت في نفس الملف النصي ولكن في السطر الثاني
وأريد كود استدعاء المحفوظات كل واحد في مكانه

مع الشكر الجزيل

السلام عليكم

- هذا هو الحل الأمثل لما تريده , إستخدام ملفات التهيئة INI , وطريقة إستخدامها كما في المثال المرفق .

- تحياتي .

انت في قمة التميز والإبداع
شكرا لك من كل قلبي

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

mounzerlb

VB_Coder

mounzerlb