تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
صناعة برنامج يعمل لشهر واحد ثم يتوقف عن العمل
#1
السلام عليكم
العنوان واضع , لو سمحتو اريد صناعة برنامج يعمل لشهر واحد ثم يتوقف عن العمل
حاولت كثير مع التاريخ ولم استطع ..
الرد }}}
تم الشكر بواسطة:
#2
تفضل اخي



Public Class Form1
Dim T As Boolean
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
T = False
Dim abdulrahman As Microsoft.Win32.RegistryKey
abdulrahman = Microsoft.Win32.Registry.CurrentUser
Dim S As String() = abdulrahman.GetSubKeyNames
For Each A As String In S
If A = "smp3" Then
T = True
End If
Next

If T = True Then
abdulrahman = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("smp3", True)
Dim x As Integer = abdulrahman.GetValue("val")
x = x + 1
abdulrahman.SetValue("val", x)
If x = 5 Or x > 5 Then
MsgBox("لقد انتهت مدتك لاستخدام البرنامج , يرجى الاتصال بفريق الدعم لمعرفة كيفية الشراء")
Application.Exit()
End If
Else
abdulrahman = Microsoft.Win32.Registry.CurrentUser.CreateSubKey("smp3")
abdulrahman.SetValue("val", 1)
End If
End Sub
End Class
الرد }}}
تم الشكر بواسطة: عبد العزيز البسكري


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل من الممكن العمل على قاعدة بيانات اكسل على الفيجوال بيسك خالد كامل1 4 83 24-03-24, 02:00 AM
آخر رد: خالد كامل1
  [سؤال] أتمنى اجابة وافية:عمل برنامج بقاعدة بيانات SQL دون حاجة تثبيت SQLSERVER dr.programming 6 601 19-03-24, 08:56 AM
آخر رد: سلامه محمد11
  سورس كود الارسال الى الواتس -يعمل يرجي التعاون للتطوير new_programer 5 228 03-03-24, 08:45 PM
آخر رد: new_programer
  [VB.NET] كيف يمكنني استظافة سوفت وير برنامج ادارة جهاز السي بي سي في المختبر الى برنامجي الحزين اليماني 2 282 15-01-24, 10:39 PM
آخر رد: الحزين اليماني
  برنامج لحفظ اكوادي samsunggears 2 386 05-01-24, 12:57 AM
آخر رد: HALIM ELEULMA
  كيف ارسل مجموع 3 تكست بوكس إلى واحد بالترتيب ؟ أبووسم 3 330 18-12-23, 05:17 PM
آخر رد: أبووسم
Exclamation [VB.NET] من يقدر يعمل لي استعلام يحقق طلبي ؟ أبو خالد الشكري 5 417 09-11-23, 02:25 PM
آخر رد: أبو خالد الشكري
  كيف اجعل البرنامج في بداية الشهر ينفذ حدث معين بالاصح اريد البرنامج في تاريخ واحد من Adel27213 3 484 05-11-23, 01:45 AM
آخر رد: justforit
Smile تطبيقي يعمل تمام على ويندوز 10 قبل تحديث الوندوز وبعد التحديث لا يعمل رمضان محمد 2 382 31-10-23, 01:50 PM
آخر رد: رمضان محمد
  انشاء واجهات برنامج شؤون الموظفين والرواتب شمسـ لا تغيب 5 12,850 27-09-23, 10:05 PM
آخر رد: melad2002

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


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