تقييم الموضوع :
  • 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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تعديل بيانات عمود DataGridView دفعة واحدة مصمم هاوي 2 164 05-03-24, 08:27 PM
آخر رد: مصمم هاوي
Heart [VB.NET] كيفية جعل الدتاجريديد فيو تظهر عندما تكون قاعدة البيانات فارغه الحزين اليماني 1 371 22-11-23, 05:31 PM
آخر رد: justforit
  [VB.NET] مطلوب دمج جملتين لتحديث قاعدة بيانات فى جملة واحدة AmeenRashed 1 335 18-11-23, 01:32 AM
آخر رد: sniper2030
  [VB.NET] مشكلة تظهر فى ExecuteNonQuery AmeenRashed 1 280 14-11-23, 05:36 PM
آخر رد: AmeenRashed
  مشكله عند طباعه الباركود الكتابة تظهر بهتة في خيال والنقاط قريبه من بعض غيرت الفونت ahmedhhh2 11 787 30-09-23, 08:31 AM
آخر رد: atefkhalf2004
  استفسار عام بخصوص فتح اكثر من اتصال على قاعدة بيانات واحدة assuhimi 0 324 15-09-23, 04:54 PM
آخر رد: assuhimi
  [سؤال] رسالة تظهر لى كلما قمت بتشغيل مشروع dr.programming 3 422 19-05-23, 06:21 PM
آخر رد: dr.programming
  حذف المسافات الزائدة في الداتا جريد لعدة سجلات دفعة واحدة yosif 4 521 09-04-23, 06:41 PM
آخر رد: Taha Okla
Exclamation [سؤال] اريد تحميل فيجوال بيسك 2010 وعمل قواعد بيانات داخله لكن عند تنصيبه تظهر رساله؟؟؟؟؟ Tame 0 345 22-03-23, 01:41 AM
آخر رد: Tame
  طباعة بيانات التقرير دفعة واحدة Tajaldeen 1 458 27-01-23, 10:03 PM
آخر رد: h2551996

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


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