تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كود لشاسة تظهر مرة واحدة
#1
كيف اقوم بعمل كود لشاسة تظهر مرة واحدة عند فتح البرنامج لاول مرة تحتوى على Button1 وButton2 الاول يظهر شاسة اضافة مستخدم جديد والاخر يظهر شاسة الاتصال بالسرفر ( وبعد ذلك لا تظهر ثانية الا عند عدم وجود مستخدمين فى قاعدة البيانات )
الرد
تم الشكر بواسطة: asemshahen5
#2
اخوانى .. هل الامر صعب الى هذه الدرجة .. اين عباقرة البرمجة ..
الرد
تم الشكر بواسطة: asemshahen5
#3
لن نسقط عليك الرطب ولكن نقول لك هز جذع النخلة
ومن هنا الطريق ، تعمل متغير تحفظه في خانة اعدادات المشروع
ويكون من نوع منطقي وبحسب القيمة المحفوظة تظهر او لا تظهر الشاشة التي تريدها



تحت خانة name ضع اسم المتغير ، ويليه نوع المتغير - اختر منطقي
تابع هنا
الرد
تم الشكر بواسطة: جميل5 , asemshahen5
#4
جزاك الله خير على الرد وعلى ماقلت من الشعر .... ولكن اخى الرابط لا يعمل ..( اريد ان اهز جذع النخلة اكثر )
الرد
تم الشكر بواسطة: جميل5 , جميل5 , asemshahen5
#5
هذا مثال قريب مما تريد .

سورس كود برنامج IT للعهدة والمستخدمين والاجهزة .

مثال عن BackgroundWorker وحفظ معلومات الاتصال .
سبحان الله وبحمده سبحان الله العظيم و الحمد لله ولا اله الا الله والله اكبر




الرد
#6
   



تضيف في الإعدادات Saveform

يمكن ان تجعل هذا في الفورم الرئيسي


كود :
كود :
  If My.Settings.Saveform = 0 Then
           Form2.ShowDialog()
       End If


وهذا الكود تضعه في Button
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       My.Settings.Saveform = 1
       My.Settings.Save()
   End Sub
أتمنى أن يكون ذو فائده لك
الرد
#7
اعمل استعلام عن مجموع عدد المستخدمين SELECT COUNT(*) FROM TBUsers
فإذا كانت النتيجة=0 فعندها أظهر شاسة اضافة مستخدم جديد
الرد
#8
اشكر الجميع على المساعدة ولقد استفدت من المشاركات جيدا ووصلت الى حل احببت مشاركتة
Dim cmd As New SqlCommand("select * from tblUsers ", Con)
Con.Open()
Dim dr As SqlDataReader = cmd.ExecuteReader
dr.Read()
If dr.HasRows > 0 Then
FrmLogIn.Show()
'MsgBox(" اهلا بك --->>>" + dr(2))
Else
frm_newuser.Show()

End If

dr.Close()
Con.Close()
الرد
تم الشكر بواسطة: alshandodi , asemshahen5


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] محتاج كود عرض اكثر من جدول فى داتا جرد فيو واحدة عن طريق اختيار الجدول من كومبوكس mohammed1994 1 162 01-09-20, 04:56 PM
آخر رد: اسامه الهرماوي
  رسالة خطأ تظهر في نسخة vb.net 2019 aftfm 3 312 12-08-20, 12:52 AM
آخر رد: حريف برمجة
  ما معنى تلك الرساله التى تظهر خالد كامل1 7 420 06-08-20, 02:29 PM
آخر رد: معاند الحظ
  تحديد نقطة واحدة dot في حقل ال datagridview Mohammed Nafa 9 396 05-08-20, 02:03 PM
آخر رد: Mohammed Nafa
  [VB.NET] دمج مصفوفتين بمصفوفة واحدة محمد اسماعيل 5 315 21-06-20, 12:11 AM
آخر رد: ابراهيم ايبو
  اريد تحريك الجمل أو الشرائح واحدة تلو الاخرى hamed.34552 0 180 25-05-20, 03:16 PM
آخر رد: hamed.34552
  رسالة خطأ تظهر عن الاتصال بقاعدة بيانات اكسس abdalla89 1 214 29-04-20, 07:36 PM
آخر رد: ابراهيم ايبو
  الحدث KeyPress ماهو الكود المناسب بحيث اسمح فقط للارقام وعلامة او نقطة واحدة فقط! سعود 6 396 20-04-20, 08:36 PM
آخر رد: ابو روضة
  [سؤال] بخصوص WordAddIn: أين يتم وضع الإضافة المبرمجة حتى تظهر في برنامج Word؟ السندبااد 2 301 17-04-20, 06:26 PM
آخر رد: ابراهيم ايبو
  [VB.NET] اضافة عدد معين على كل الاسماء دفعة واحدة EMADSSS 4 365 20-03-20, 02:25 PM
آخر رد: EMADSSS

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم