تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] طلب تعديل علي كود تفعيل وحفظ التفعيل
#11
(11-10-18, 03:31 AM)حريف برمجة كتب : https://stackoverflow.com/questions/1735...made-in-vb


متقدرش بعد اذنك تعدله ليا لان كل ما اجرب مش بيحفظ
الرد
تم الشكر بواسطة:
#12
https://www.youtube.com/watch?v=coaOpmooBfc

https://www.youtube.com/watch?v=Ozaa4-Q20_s

تابع أخى هذه الفيديوهات فبها ما تطلبه وشرح عربى
الرد
تم الشكر بواسطة: ScreamVoice
#13
(11-10-18, 04:59 AM)ابو روضة كتب : https://www.youtube.com/watch?v=coaOpmooBfc

https://www.youtube.com/watch?v=Ozaa4-Q20_s

تابع أخى هذه الفيديوهات فبها ما تطلبه وشرع عربى


تسلم يا صحبي 
هو انا عارف ان العيب فيا انا طبعا ههههه
بس انا هلغي كل اللي عملته وهحاول مع نفسي لحد ما يجي ابن حلال يعدلي علي البروجيكت بتاعي كامل ههههه
الرد
تم الشكر بواسطة:
#14
الحمد لله وبعد طول انتظار عملت اللي في دماغي هههههه

احنا البرمجة فينا بس ربنا اللي هدينا

شكرا علي المساعدة وبالاخص اخى ابو روضة

كود :
Imports System.Net
Public Class Form1
   Dim P As New WebClient

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       Process.Start("http://www.google.com")
   End Sub

   Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

       
       If Label1.Text = My.Settings.code Then
           Form2.Show()
           Me.Close()

       Else
           MsgBox("برجاء حذف التفعيل والتاكد من وجود كود جديد", MsgBoxStyle.Critical, Nothing)
           Me.Close()

       End If

   End Sub

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

       If Label1.Text = TextBox1.Text Then
           Interaction.MsgBox("تم التفعيل الرجاء اعادة تشغيل البرنامج", MsgBoxStyle.Information, Nothing)
           Button3.Visible = Not Button3.Visible
           Button4.Visible = Not Button4.Visible
           Button1.Visible = Not Button1.Visible
           Button2.Visible = Not Button2.Visible
           TextBox1.Visible = Not TextBox1.Visible
           My.Settings.code = TextBox1.Text
           My.Settings.Save()
           Me.Close()
           
       Else
           Interaction.MsgBox("يرجي كتاية الكود صحيح", MsgBoxStyle.Critical, Nothing)
       End If
       
   End Sub

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Label1.Text = P.DownloadString("https://dl.dropboxusercontent.com/s/c5r8hjct5tm32km/Password.txt?dl=0")
       Label1.Hide()
       Button3.Visible = My.Settings.Button3
       Button4.Visible = My.Settings.Button4
       Button1.Visible = My.Settings.Button1
       Button2.Visible = My.Settings.Button2
       TextBox1.Visible = My.Settings.TextBox1

   End Sub

   Private Sub TextBox1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyUp
       If e.KeyCode = Keys.Enter Then
           Button1_Click(sender, e)
       End If
   End Sub

   Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
       My.Settings.Button3 = Button3.Visible
       My.Settings.Button4 = Button4.Visible
       My.Settings.Button1 = Button1.Visible
       My.Settings.Button2 = Button2.Visible
       My.Settings.TextBox1 = TextBox1.Visible
       My.Settings.Save()
   End Sub

   Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
       My.Settings.Reset()
       TextBox1.Show()
       Button1.Show()
       Button2.Show()
       Button3.Hide()
       Button4.Hide()
       Interaction.MsgBox("تم حذف التفعيل الرجاء اعادة تشغيل البرنامج", MsgBoxStyle.Information, Nothing)
       My.Settings.code = TextBox1.Text
       My.Settings.Save()
       Me.Close()
   End Sub

End Class


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مساعده :- في تعديل كود الطباعه dubai.eig 9 197 11-10-18, 02:34 PM
آخر رد: عبدالله الدوسري
  سؤال عن تفعيل البرنامج عن طريق الفلاش ميمورى asemshahen5 7 201 07-10-18, 09:48 PM
آخر رد: %Eman%
  تعديل كود بحث بسيط dasktop 5 116 05-10-18, 12:43 AM
آخر رد: elgokr
  [سؤال] محتاج تعديل بسيط في كود ScreamVoice 7 120 04-10-18, 06:41 AM
آخر رد: ScreamVoice
  سؤال فى تفعيل البرنامج salah mansour 1 68 02-10-18, 12:10 AM
آخر رد: Hazem1
  سؤال حول تعديل على نص trakktour 5 117 01-10-18, 02:57 AM
آخر رد: rnmr
  احد يساعدني في تعديل هذا الكود nagoma 0 41 29-09-18, 12:06 AM
آخر رد: nagoma
  تعديل بسيط dasktop 4 123 25-09-18, 10:50 AM
آخر رد: elgokr
  [VB.NET] مساعده في تفعيل سلفر اكسيس مع الفجيوال بيسك hayitham 6 150 18-09-18, 11:28 AM
آخر رد: elgokr
  [VB.NET] تفعيل فجوال ستوديو 2015 او 2017 larbihamri 1 75 14-09-18, 02:42 PM
آخر رد: عبدالله الدوسري

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


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