عمل ملفات عن البرنامج

اخي اولا

ضع عليك التعديل في خصائص مربع النص في الخاصية الاولى لكي يدعم تعددية الاسطر

والثاني لاظهار السكرول الافقي او العامودوي او كلاهما

    Text1.MultiLine = True
    Text1.ScrollBars = 3 ' Both

عملت كدة مافى نتيجة

بعدين عايزة طريقة عشان انسخ ملف الى داخل الtext

f = "file.txt"
st = ""
temp = txt.text

open f for binary as #1
 for i=1 to filelength(f) 
   st = mid(1 , temp , 1)
   temp = mid( 2 , temp , len(temp)-1)
   put 1, , st
 next i
 close #1

يمكنك الاستفادة من هذا الكود

تاتى رسالة خطافى sub fuction of defined

فى الكلمة filelength

هل اعدل فى الكود يعنى اى اكتب اسم الفائل بتاعى الفى الكمبيوتر

ارجو الرد على طلبى

مرة اخرى ارجو الرد على طلبى

مافيش حد يساعد

الكود بعد التعديل

f = "file.txt"
st = ""
temp = txt.text

open f for binary as #1
for i=1 to LOF(1) 
  st = mid(1 , temp , 1)
  temp = mid( 2 , temp , len(temp)-1)
  put 1, , st
next i
close #1

عملت التعديل تاتى رسالة خطا 424

object required

عند السطر temp = txt.text

lماذا افعل واين اكتب اسم الفائل بتاعى فى الكود

ياجماعة الكود لم يشتغل راجعوا لى الكود

ولا اعرف اين اكتب اسم الفائل

ارجو شرح الكود

يجب وضع خانة نص "Text Box" باسم txt

وفيها سيتم عرض بيانات الملف المفتوح

وخانة نص أخرى باسم File

وفيها يتم وضع إسم ومسار الملف المراد فتحه

ثم كتابة هذا الكود ف الحدث المناسب

f = "file.txt"
st = ""
temp = txt.text

open f for binary as #1
for i=1 to LOF(1) 
 st = mid(1 , temp , 1)
 temp = mid( 2 , temp , len(temp)-1)
 put 1, , st
next i
close #1

اسفة اخى تعبتك معى لكن عملت اى قولتها بس المافى نتيج ياخى لو سمحت انا رسلت ليك الفورم اطاع عليه

ثم لو ممكن ترسل لى نسخة صغيرة لفورم به هذه الكودات لانو انا خلاص برنامجى متوقف على هذا

a.vbp

اتمنى ان يفى بالغرض

pro.zip

شكرا لا اعرف ماذا اقول لك اخى شكرا بس الكود يعمل رسالة خطاء عند يظلل filter

الرسالة تقول

method or data member not found

ماذا اعمل

بعدين اريد اعرف ماهى وظيفة

cd

وينك يا اخ رمضان

لماذا ياتى الخطا ء عند

FILTER

هل هنك مكتبة غير مضافة عندى ام ماذا

ما من مجيب

CD هى اسم الـ comman dialog control ويجب إضافتها عن طريق

Ctrl + T

ثم إختيار Microsoft Comman Dailog Control

ما من مجيب

شكرا ياخ لامضان البرنامج عمل كويس لكن هذا الكود يعنى للفتح الملف فقط انا عاوزة يعنى يكون الملف بمجرد تشغيل الفورم يكون الملف ثابت مثل النص الذى ياتى مع البرhمج الجاهزة قبل التحميل تعمل عليه accept .

يعنى مثل help للبرنامج تكون ثابتة فى الفورم يعنى ما عملية فتح

بمجرد تشغيل الفورم تقرا ال help .

ان شالله تكون وصلت ليك الفكرة

اخى رمضان معاى

شكرا ياخ لامضان البرنامج عمل كويس لكن هذا الكود يعنى للفتح الملف فقط انا عاوزة يعنى يكون الملف بمجرد تشغيل الفورم يكون الملف ثابت مثل النص الذى ياتى مع البرhمج الجاهزة قبل التحميل تعمل عليه accept .

يعنى مثل help للبرنامج تكون ثابتة فى الفورم يعنى ما عملية فتح

بمجرد تشغيل الفورم تقرا ال help .

ان شالله تكون وصلت ليك الفكرة

الى الأخت ebsom مثل هذا الملف

مثال على الشريط.zip

أخيراُ فهمت المطلوب

وهو فى الملف المرفق

temp.zip

ما فهمتك اخى رمضان ماذا تقصد بالملف المرفق