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

نسخة كاملة : انشاء فورم يظهر مرة واحدة عند البدء بالبرنامج
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام عليكم ورحمة الله و بركاته

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

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

حيث يتم تعبئة جدول مرتبط بهذا الفورم

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

وانا استخدم قاعدة بيانات اكسس

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

If GetSetting(Application.ProductName, Me.Name, "Value", False) Then
Me.Close()
Else
SaveSetting(Application.ProductName, Me.Name, "Value", True)
'Threading.Thread.Sleep(2000)
'Me.Close()
End If

السطرين المعطلين يخص ابقاء الفورم لمدة (ثانيتين) ثم يغلق نفسه
(11-03-19, 11:00 PM)5000 كتب : [ -> ]جرب هذا الكود ضعه حدث Load لفورم تسجيل الدخول

If GetSetting(Application.ProductName, Me.Name, "Value", False) Then
   Me.Close()
Else
   SaveSetting(Application.ProductName, Me.Name, "Value", True)
'Threading.Thread.Sleep(2000)
'Me.Close()
End If

السطرين المعطلين يخص ابقاء الفورم لمدة (ثانيتين) ثم يغلق نفسه

شكرا لك جاري التجربة
الكود السابق خطأ تفضل التعديل غير xxx لاسم الفورم الذي تريد اظهاره مرة واحدة
 
If GetSetting(Application.ProductName, xxx.Name, "Value", 0) = 0 Then
    xxx.ShowDialog()
    SaveSetting(Application.ProductName , xxx.Name, "Value", 1)
End If

وفي داخل الفورم xxx يمكنك عمل تايمر مع تشغيله لغلف نفسه بعد مدة تحددها
بانتظار ردود الاعضاء 

لم تصلح هذه الطريقة معي 

شكرا لك
السلام عليكم 

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

واذا لم يجد سجلات يقوم بفتح الفورم الاول 

نفس فكرة فورم لتسجيل سريل للبرنامج


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

تحياتى
(12-03-19, 09:23 AM)mmali127 كتب : [ -> ]السلام عليكم 

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

واذا لم يجد سجلات يقوم بفتح الفورم الاول 

نفس فكرة فورم لتسجيل سريل للبرنامج


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

تحياتى

اتمنى منكم اعداد مثال على ذلك مع الشكر
نسيت أن أذكر في مشاركتي الأخير التي تحتوي على الكود المعدل بأن تضعه في بداية حدث تحميل Load لفورم تسجيل الدخول.
(12-03-19, 03:23 PM)5000 كتب : [ -> ]نسيت أن أذكر في مشاركتي الأخير التي تحتوي على الكود المعدل بأن تضعه في بداية حدث تحميل Load لفورم تسجيل الدخول.

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

بخصوص طلبك ظهور فورم لمرة واحدة فقط
وليكن كا فكرة انشاء المستخدم الاداري للتحكم بالبرنامج

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

الان بعد اتمام عمل استعلام على هذا الجدول
وترحيل الاستعلام الـ DT 
ستقوم بعمل تحقق اذا كان DT يحتوى على اى نتائج ام فارغ
بطبيعة الحال سيكون المرة الاولى فارغ فنها تقوم باظهار فورم شاشة انشاء مستخدم جديد

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

ملخص الامر : انت سيكون لديك 3 شاشات
1- شاشة فارغة لا تظهر وبمجرد التحقق من الكود لظهور الشاشة المحددة يتم اغلاقها
2- شاشة تسجيل مستخدم ادارى
3- شاشة تسجيل الدخول

الشاشة الفارغة هى عبارة عن احتواء كود فى اللود
للاستعلام والتحقق كما ذكرت فى الاعلى وطبعاً الشاشة لا تظهر عند التشغيل بحيث يتم عمل لها كود اخفاء ببداية سطر اللود
وبنهاية كود اللود كود الاغلاق طبعاً بعد تنفيذ الاستعلام و كود فتح الشاشة طبقاً لنتائج الاستعلام

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

تحياتى لك
وتمنياتى لك التوفيق
الصفحات : 1 2