جدول المحتويات:

صانع الدُفعات: 4 خطوات
صانع الدُفعات: 4 خطوات

فيديو: صانع الدُفعات: 4 خطوات

فيديو: صانع الدُفعات: 4 خطوات
فيديو: انشاء فاتورة سريعة - الفاتورة الالكترونية | نظام #فاتورة 2024, يوليو
Anonim
صانع الدُفعات
صانع الدُفعات

تحديث V2.0 الآن !!! قم بالتحميل أدناه هذا مشروع كنت أعمل عليه قليلاً.. لقد تم إنشاؤه باستخدام vb.net 2008 وهو يجعل الدفعة بسيطة للمبتدئين… !!!!!!!! يرجى ملاحظة !!!!! !!!!!!!! لن يعمل هذا إلا على VISTAit لأنني صنعت هذا على Vista الآن عندما أجربه على جهاز XP تظهر رسالة خطأ.. آسف أيها الناس ، يجب أن أشكر TATcreator لأنه حتى يعرف أنه لا يعرف أنه أعطاني فكرة لجعل هذا.. لول.

تأكد من إلقاء نظرة على الخطوة الأولى "التثبيت" قبل التنزيل !!!! أتمنى حقًا أن تنال إعجابك.. وإذا وجدت أي مشاكل معها ، فيرجى ترك تعليق أو الاتصال بي حتى أتمكن من إصلاحها وإعادة نشرها … من فضلك علق على ما تعتقده ولا تنسى تقييمه =)

الخطوة 1: التثبيت

التركيب
التركيب
التركيب
التركيب
التركيب
التركيب

للتثبيت ، اتبع الخطوات والصور عن كثب !!! 1) اتبع الصورة 1 إذا حصلت للتو على صفحة بها الكثير من النص عند النقر فوق الرابط 2) انقر فوق حفظ 3) تأكد من حصولك على جميع البتات الحمراء بشكل صحيح !!! حفظ باسم.exe وتأكد من حفظ باسم "All Files" وإلا فلن يعمل !!!!!

الخطوة 2: كيف يعمل: الجزء 1

كيف يعمل: الجزء 1
كيف يعمل: الجزء 1
كيف يعمل: الجزء 1
كيف يعمل: الجزء 1

كومبو بوكس

كما قلت ، لقد صنعت مع vb 2008 لذلك لا توجد برمجة نصية مجمعة. لتحقيق كل ما كان علي فعله هو: إذا تم تحديد "كتابة" في comboboxchange label2 إلى "اكتب رسالة - لا تقم بإضافة الصدى!" textbox1change textbox1 إلى "ماذا تريد أن تقول؟" والذي يتضح كما يلي: If ComboBox1. SelectedItem = ("Write") ثم Label2. Text = ("اكتب رسالة - لا تقم بإضافة الصدى!") TextBox1. Show () TextBox1. Text = ("ماذا تريد أن تقول؟") End IfI كان علي الاستمرار في القيام بذلك لكل عنصر في مربع التحرير والسرد.

الخطوة 3: كيف يعمل: الجزء 2

كيف يعمل: الجزء 2
كيف يعمل: الجزء 2
كيف يعمل: الجزء 2
كيف يعمل: الجزء 2

الأزرار

كانت الأزرار من أصعب الأشياء التي يجب القيام بها ، أما بالنسبة لزر الإضافة للعمل ، كان علي أن أقوم بالكثير من الترميز ولكن بمجرد أن فعلت ذلك كان الباقي بسيطًا إلى حد ما … جزء من كود الإضافة: إذا كان "اكتب" تم التحديد في مربع التحرير والسرد ثم قم بإضافة "صدى" + محتويات textbox1end الذي يتحول إلى: If ComboBox1. SelectedItem = ("Write") ثم ListBox1. Items. Add ("echo" + TextBox1. Text) End Ifit كان في الغالب هو نفسه لمعظم زر الإزالة هو فقط: إزالة العنصر المحدد من القائمة وهو: ListBox1.. Clear () ListBox1. Items. Add (":: Made With iRule Batch Maker") ListBox1. Items. Add ("@ echo off") وتحريك الكود لأعلى ولأسفل فقط حرك العنصر المحدد لأعلى أو لأسفل: (كود إلى طويل لتحمل)

الخطوة 4: كيف يعمل: الجزء 3

كيف يعمل: الجزء 3
كيف يعمل: الجزء 3

حفظ / تحميل

ربما كان الحفظ والتحميل الجزء الأصعب ، هذا هو مجرد رمز الحفظ: Dim sfdMain كـ SaveFileDialog جديد sfdMain. InitialDirectory = My. Computer. FileSystem. SpecialDirectories. MyDocuments باهتة نتيجة DialogResult sfdMain. Filter = "Batch Files (*.bat) | *.bat | ملفات CMD (*. cmd) | *.cmd "sfdMain. FilterIndex = 1 sfdMain. ValidateNames = True Result = sfdMain. ShowDialog If Result = Windows. Forms. DialogResult. OK ثم قم بتعتيم sw كنظام جديد.. إذا فهمت vb ، فستعرف ما يفعله ذلك ولكن إذا لم تفعل ذلك: في الأساس ، كل ما يفعله هو إظهار مربع حوار الحفظ ، ويحفظ جميع محتويات القائمة في ملف دفعي أو ملف cmd

موصى به: