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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طلب تعديل كود ahmedmansour 0 15 منذ 10 ساعة مضت
آخر رد: ahmedmansour
  [VB.NET] مساعده :- في تعديل كود الطباعه dubai.eig 9 214 11-10-18, 02:34 PM
آخر رد: عبدالله الدوسري
  سؤال عن تفعيل البرنامج عن طريق الفلاش ميمورى asemshahen5 7 252 07-10-18, 09:48 PM
آخر رد: %Eman%
  تعديل كود بحث بسيط dasktop 5 144 05-10-18, 12:43 AM
آخر رد: elgokr
  [سؤال] محتاج تعديل بسيط في كود ScreamVoice 7 142 04-10-18, 06:41 AM
آخر رد: ScreamVoice
  سؤال فى تفعيل البرنامج salah mansour 1 84 02-10-18, 12:10 AM
آخر رد: Hazem1
  سؤال حول تعديل على نص trakktour 5 138 01-10-18, 02:57 AM
آخر رد: rnmr
  احد يساعدني في تعديل هذا الكود nagoma 0 61 29-09-18, 12:06 AM
آخر رد: nagoma
  تعديل بسيط dasktop 4 138 25-09-18, 10:50 AM
آخر رد: elgokr
  [VB.NET] مساعده في تفعيل سلفر اكسيس مع الفجيوال بيسك hayitham 6 164 18-09-18, 11:28 AM
آخر رد: elgokr

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


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