منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - الرجاء تعديل علا المثال التالي لعرض ملف هيكس في ليست بوكس

الصفحات : 1 2

السلام علكيم ورحمة الله وبركته

الرجاء تعديل علا المثال التالي لعرض ملف هيكس في ليست بوكس

كود :

Imports System.IO

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim oReader As StreamReader

        OpenFileDialog1.CheckFileExists = True

        OpenFileDialog1.CheckPathExists = True

        OpenFileDialog1.DefaultExt = "BIN"

        OpenFileDialog1.FileName = ""

        OpenFileDialog1.Filter = "Text Files (*.BIN)|*.BIN|All Files (*.*)|*.*"

        OpenFileDialog1.Multiselect = False

        If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

            oReader = New StreamReader(OpenFileDialog1.FileName, True)

            ListBox1.Text = oReader.ReadToEnd

        End If

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Dim oReader As StreamReader

        SaveFileDialog1.CheckFileExists = True

        SaveFileDialog1.CheckPathExists = True

        SaveFileDialog1.DefaultExt = "BIN"

        SaveFileDialog1.FileName = ""

        SaveFileDialog1.Filter = "Text Files (*.BIN)|*.BIN|All Files (*.*)|*.*"

        SaveFileDialog1.Multiselect = False

        If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

            oReader = New StreamReader(OpenFileDialog1.FileName, True)

            ListBox1.Text = oReader.ReadToEnd

        End If

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

End Class

اريد عرض ملف مرفق مع السورس
في الليست بوكس

واريد بروقرام بار يعمل مع طريقة العرض

تم نعديل المرفق

وعليكم السلام ورحمة الله وبركاته

يبدو ان هناك خلل فى السورس المرفق

الرجاء مراجعة السورس واعادة رفعه

تحياتى لك

وتمنياتى لك التوفيق

برك الله فيك عابر سبيل لكن انا مبتدئ في vb. Net
كنت اشتغل علا vb6
هذ هو السبب

وضعت هذا الكواد لكنه لم يضهر شيا في ليست بوكس

كود :

Imports System.IO

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim oReader As StreamReader

        OpenFileDialog1.CheckFileExists = True

        OpenFileDialog1.CheckPathExists = True

        OpenFileDialog1.DefaultExt = "BIN"

        OpenFileDialog1.FileName = ""

        OpenFileDialog1.Filter = "Text Files (*.BIN)|*.BIN|All Files (*.*)|*.*"

        OpenFileDialog1.Multiselect = False

        If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

            oReader = New StreamReader(OpenFileDialog1.FileName, True)

            ListBox1.Text = oReader.ReadToEnd

        End If

    End Sub

End Class

كود :

class form1

..

...

..

end class

Enter this code

(21-08-18, 06:24 AM)عابر سبيل 2 كتب : [ -> ]
ليس به خلل، ولكن صاحب السؤال مسح الاكواد كلها بما فيها اسم الكلاس

ليظهر الفورم اضغط دبل كليك على ملف الفورم واكتب التالي

PHP كود :

class form1 end class

لم اجب عليه لأنني لم أرى أي اجتهاد منه في المشروع

ليس هذا ما اعني اخى عابر سبيل 2

ما اقصده ان اخى الفاضل wolf1120

لن يبادر بعمل اى شئ فى المشروع وان المشروع أو الصورة المرفقة

ما هى الى فكرة ويريد من احد ان يقوم بتطبيقه له وهذا اشبه بـ

من يريد طلب سورس وليس المساعدة وهذا بالنهاية لا يفيده فى التعليم

بال الاعتماد على النسخ و اللصق لان حتى توضح له الفكرة

وان يتعلم من الاكواد فيفضل ان يقوم بعمل المشروع بنفسه ثم يطلب بعض الاكواد

والتسائلات عن كيف يقوم بعمل كذا وكذا حتى توضح له كل كود يكتب وان يتعلم منه

لكن فى هذه المرة يبدو ان اعاد ارفاق المشروع

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

تحياتى لكم

وعيد عيد عليكم جميعاً

وتمنياتى لك التوفيق

(22-08-18, 07:17 AM)elgokr كتب : [ -> ]
(21-08-18, 06:24 AM)عابر سبيل 2 كتب : [ -> ]ليس به خلل، ولكن صاحب السؤال مسح الاكواد كلها بما فيها اسم الكلاس
ليظهر الفورم اضغط دبل كليك على ملف الفورم واكتب التالي

PHP كود :

class form1 end class

لم اجب عليه لأنني لم أرى أي اجتهاد منه في المشروع

ليس هذا ما اعني اخى عابر سبيل 2

ما اقصده ان اخى الفاضل wolf1120
لن يبادر بعمل اى شئ فى المشروع وان المشروع أو الصورة المرفقة
ما هى الى فكرة ويريد من احد ان يقوم بتطبيقه له وهذا اشبه بـ
من يريد طلب سورس وليس المساعدة وهذا بالنهاية لا يفيده فى التعليم
بال الاعتماد على النسخ و اللصق لان حتى توضح له الفكرة
وان يتعلم من الاكواد فيفضل ان يقوم بعمل المشروع بنفسه ثم يطلب بعض الاكواد
والتسائلات عن كيف يقوم بعمل كذا وكذا حتى توضح له كل كود يكتب وان يتعلم منه

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

تحياتى لكم
وعيد عيد عليكم جميعاً
وتمنياتى لك التوفيق

ولكن هذه ليست عادتك!

فلقد عودت الأعضاء أن تعطيهم مشروع كامل من عندك لما يريدون

حتى لو لم يضعوا مشروع من عندهم.

ما الذي غيرك؟

عيدك مبارك

لم اجد بالمشروع ملف ليتم التطبيق عليه!

(22-08-18, 07:33 AM)عابر سبيل 2 كتب : [ -> ]
ولكن هذه ليست عادتك!

فلقد عودت الأعضاء أن تعطيهم مشروع كامل من عندك لما يريدون

حتى لو لم يضعوا مشروع من عندهم.

ما الذي غيرك؟

عيدك مبارك

لا يوجد اى تغيير اخى عابر سبيل 2

فيارب يبعدنا عن التغير وعن ضيق الوقت ان اكون عون المساعدة دائماً

بالعكس عند دخولى الان فى هذا التوقيت

دخلت حتى اعمل على المشروع لهذا الموضوع لكن

اجد ان المرفق ينقصه الملف المطلوب التعامل معه

ولا اعلم اذا كان من نوع نص ام ماذا لان وصف الملف بـ هيكس

والكود يريد ارفاق ملف من نوع BIN فهو حتى الان لن يوصف ما يريده تماماً

الا انه قام بتصميم الشكل وقام بارفاق الصورة لما يريده

ولكن سبب ردى السابق هو لانى احتاج تفاعل صاحب الموضوع

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

كذلك لان هذه الايام صعوبة الوقت اغلب الاوقات

حيث اننى اريد انشاء دورة مبسطة تجعل من الجميع تفهم كيفية كتابة الكود

والتعامل معها بكل بساطة بدون اى تعقيد لتمكن من يتابع الدورة

ان يقوم بانشاء اى سورس مهما كانت اذا كانت عن برامج حسابية

او برامج تحتوى على قواعد بيانات او بدون وما غير ذلك

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

لذلك اذا كان المساعدة الدائمة هى وسيلة لان يطلب الاعضاء بدن فهم لما ارفقهم لهم

هذا يجعلني ضعيف الشخصية لاننى لم اوصل الفكرة لكيفية استخدام الكود داخل السورس

واسعى ان تكون فى المرات القادة ان اكون ادق فى الشرح للكود

كما تلاحظ فى الفترات الاخير قمت بذلك اذا كنت تتباع ردودى على اغلب المواضيع

تحياتى لك

وتمنياتى لك التوفيق

اضحى مبارك على الجميع

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

من ناحية أخرى يجب على طالب العون السعي والعمل على الاقل ببضعة اكواد ولو خاطئة وبشكل يحاول فيه حث

الاخرين على المساعدة .... صباحكم خير وعطاء

(22-08-18, 08:28 AM)ابراهيم ايبو كتب : [ -> ]
اضحى مبارك على الجميع

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

من ناحية أخرى يجب على طالب العون السعي والعمل على الاقل ببضعة اكواد ولو خاطئة وبشكل يحاول فيه حث

الاخرين على المساعدة .... صباحكم خير وعطاء

اهلاً بك اخى ابراهيم ايبو

ما قمت بتظليله باللون الاحمر

هذا هو تماماً ما اعنيه وليس فقط لجعل الاخرين بالمساعدة فقط

بل لجعله ان يلاحظ الفرق ويتعلم بما تم بالنهاية من كود

تحياتى لك

وعيد سعيد عليك وعلى الجميع

وتمنياتى لك التوفيق

الصفحات : 1 2

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

wolf1120

elgokr

wolf1120

وعد مولود

elgokr

عابر سبيل 2

سعود

elgokr

ابراهيم ايبو

elgokr