تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] سؤال بخصوص الكود تبع النسخة التجريبية
#1
هذا الكود يعمل بالسنة
كود :
lblDate.Text = Date.Now.ToString("dddd") & " - " & Date.Now.ToString("MMM dd, yyyy")
       frmLogin.ShowDialog()
       txtna.Text = Date.Now.ToString("dd")
       If txtna.Text = "3" Then

           MsgBox("تم تحميل البيانات بنجاح", MsgBoxStyle.OkOnly, "تسجيل الدخول")
       Else

           MsgBox("انتهت النسخة المجانية", MsgBoxStyle.OkOnly, "انتهاء الخدمة")
           Me.Close()
       End If
       TextBox1.Text = Now.ToString("ddmmyyyy")
اذا بغيت احوله الى بعدد الايام كيف ؟؟
وايضا بعدد الاشهر كيف ؟؟

لو سمحتم

مثال ابغي اخليه يعمل لـ 15 يوم فقط

او اخليه يعمل لمدة لاتتجاوز شهرين او شهر واحد
الرد
تم الشكر بواسطة:
#2
هذا مثال به ما تريد باذن الله في الفورم : FrmLogin 

في Private Sub Form_Open .

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




الرد
تم الشكر بواسطة: ابو روضة



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


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