منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] ممكن عمل كود لحفظ المكتوب داخل اداة TextBox (/showthread.php?tid=50464)

ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - الورد الصناعي - 16-10-24

ممكن عمل كود لحفظ المكتوب  داخل اداة TextBox
يعني لو  اكتب داخل TextBox واضغط زر حفظ  ثم اغلق التطبيق واشغله من جديد اجد المكتوب موجود
 وكذلك لو انقل التطبيق لكمبيوتر اخر اجد المكتوب موجود داخل TextBox موجود

ولما اعمل تعديل على المكتوب داخل TextBox  من قبل واضغط  زر حفظ يحفظ التحديث الجديد الموجود داخل TextBox

عندي في النموذج عدد 12 من اداة TextBox وزر واحد من Button

وما افضل طريقه لحفظ البيانات الموجود داخل TextBox هل تخزينها داخل قاعدة بيانات ولا ايش ؟





RE: ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - Taha Okla - 16-10-24

اذا شغلة مربع نص  فهي لا تستحق أكثر من ملف xml

للحفظ تستخدم الكود :
كود :
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim dt1 As New DataTable("tb1")
       dt1.Columns.Add("text1")

       dt1.Rows.Add(TextBox1.Text)
       dt1.WriteXml("TA.xml")

   End Sub

وللاستعادة الكود :
كود :
   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       Dim dt1 As New DataTable("tb1")
       dt1.Columns.Add("text1")
       dt1.ReadXml("TA.xml")

       TextBox1.Text = dt1.Rows(0)(0)
   End Sub
كمثال تم وضع كل كود ضمن زر أمر ..

أما أين تريد استخدام الأكواد ومتى تسترجعهن .. فأنت أدرى أين تضع كل كود بما يناسبه..

RE: ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - الورد الصناعي - 16-10-24

شكرا لك عزيزي
ماهو ملف xml وهل يعمل على نظام ويندوز
اما زر استعاده ما الفائده منه انا ابغى اكتب واحفظ المكتوب فقط ويعمل حتى بعد النقل لكمبيوتر اخر اجد موجود المكتوب داخل TextBox عند تشغيل التطبيق
ولو تقدر لو مش اليوم تعمل ملف للمشروع وترفع المشروع هنا ولا تغير اسم الاداة الافتراضي مثل TextBox و Button

RE: ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - Taha Okla - 16-10-24

فقط جرب تشتغل بايدك وراح تعرف أنها أ[سط من أن تظل تنتظر حتى يتم حل الأمر وتستلمه ع الجاهز..
لا تعتمد يكون كل شي جاهز(نسخ ولصق)
وإلا أين دورك ك مبرمج..؟؟!!

RE: ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - الورد الصناعي - 17-10-24

بعد تطبيق المثال 
عند الكتابة داخل اداة TextBox اكتب فيها مثلا هلا ثم اضغط زر للحفظ  ثم اغلق التطبيق 
وعند تشغيل التطبيق لا اجد كلمة هلا داخل اداة TextBox 
وعند الضغط على زر للاستعادة تظهر الكلمة هلا انا اريد تظهر كلمة هلا بدون الضغط على زر للاستعادة عند تشغيل التطبيق



RE: ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - Taha Okla - 17-10-24

ضع كود الاستعادة في حدث تحميل النافذة
فيستيعد أثناء ظهور النافذة.

RE: ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - salamandal - 17-10-24

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

بالنسبة لملفات xml هي ملفات عادية مثل اي ملفات نصية txt او غيره
ادخل مجلد bin للبرنامج وستجد الملف الذي انشاته هناك وتستطيع قراءة ما فيه بسحبه الى برنامج المفكرة notepad

بالنسبة لقراءة الملف او الاسترجاع يوضع الكود في حدث تحميل النافذة load form 
اذا كنت لا تعرف كيف تظهر هذا الحدث..انقر مرتين على الفورم وسيظهر الكود الخاص به ..ثم ضع كود الاسترجاع داخله

RE: ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - الورد الصناعي - 17-10-24

(( بالنسبة لملفات xml هي ملفات عادية مثل اي ملفات نصية txt او غيره ))

وهل انقل الملف xml  مع الملف الجاهز exe لكمبيوتر اخر حتى يظهر المحفوظ بالتطبيق من قبل
بعد البحث عن ملف xml   يوجد اكثر من ملف بنفس الامتداد داخل نفس المجلد  Debug

اي واحد انقل مع الطبيق exe

RE: ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - salamandal - 17-10-24

لو تصفحت الكود الذي ارفقه الاخ طه لوجدت الاسم بسهولة
dt1.ReadXml("TA.xml")
TA.xml هو اسم الملف
نعم اذا نقلت البرنامج الى جهاز اخر يجب نقل الملف معه

RE: ممكن عمل كود لحفظ المكتوب داخل اداة TextBox - salamandal - 17-10-24

هذا مثال أخر باستعمال ملف نصي

http://vb4arb.com/vb/showthread.php?tid=48456