1. --•DeviL Hacker•--

    --•DeviL Hacker•-- ExpErt DeveloPer

    الأنتساب:
    ‏15 نوفمبر 2014
    المشاركات:
    661
    الإعجابات المتلقاة:
    867
    نقاط الجائزة:
    93
    الجنس:
    ذكر
    الوظيفة:
    صنـآعـة برآمـج
    الإقامة:
    IraQ
    السلام عليكم ورحمة الله وبركاتة
    الصلاة والسلام على اشرف المرسلين سلام الله عليهم
    كيف حالكم اخواني واخواتي اينما كنتم حياكم الله
    ~
    رآجعلكم اليوم بشرح بسيط هـو :


    صنع برنامج يعطيك الوقت والتاريخ فـي هذة اللحضة
    بـ الفيجوال بيسك 10


    آلـشـرح عـلـى يوتيوب


    الآكواد المستخدمة فـي الشـرح


    [NOTE][/NOTE] timer
    ------
    Label1.Text = My.Computer.Clock.LocalTime
    -----
    form1
    -------
    timer1.start()


    ~


    تحميل البرنامج الذي صممتة آنـآ


    تـحـيـآتـي لـكـم:ُeُe@:​
     
  2. المعاقب الصدري

    المعاقب الصدري V • I • P

    الأنتساب:
    ‏20 يوليو 2014
    المشاركات:
    924
    الإعجابات المتلقاة:
    681
    نقاط الجائزة:
    93
    الجنس:
    ذكر
    رد: صنع برنامج حساب الوقت والتاريخ بالفيحوال بيسك 10

    احسنت حبيبي على هذا الشرح {1!$8}
     
  3. --•DeviL Hacker•--

    --•DeviL Hacker•-- ExpErt DeveloPer

    الأنتساب:
    ‏15 نوفمبر 2014
    المشاركات:
    661
    الإعجابات المتلقاة:
    867
    نقاط الجائزة:
    93
    الجنس:
    ذكر
    الوظيفة:
    صنـآعـة برآمـج
    الإقامة:
    IraQ
    رد: صنع برنامج حساب الوقت والتاريخ بالفيحوال بيسك 10

    نورت الموضوع ضلعي علاوي
     
  4. PIRATE-INC

    PIRATE-INC Developer

    الأنتساب:
    ‏9 يوليو 2012
    المشاركات:
    57
    الإعجابات المتلقاة:
    1
    نقاط الجائزة:
    8
    الإقامة:
    الجزائر - افريقيا - الارض - درب تبانة
    رد: صنع برنامج حساب الوقت والتاريخ بالفيحوال بيسك 10

    يعطيك آلعآفيه آخيُ ..
     
  5. Ameer Eagle

    Ameer Eagle V • I • P

    الأنتساب:
    ‏7 يونيو 2014
    المشاركات:
    3,233
    الإعجابات المتلقاة:
    2,779
    نقاط الجائزة:
    113
    الجنس:
    ذكر
    الوظيفة:
    Student
    الإقامة:
    IraQ
    رد: صنع برنامج حساب الوقت والتاريخ بالفيحوال بيسك 10

    وعليكم السلام ورحمة الله .. بارك الله بيك :{13}:
     
  6. --•DeviL Hacker•--

    --•DeviL Hacker•-- ExpErt DeveloPer

    الأنتساب:
    ‏15 نوفمبر 2014
    المشاركات:
    661
    الإعجابات المتلقاة:
    867
    نقاط الجائزة:
    93
    الجنس:
    ذكر
    الوظيفة:
    صنـآعـة برآمـج
    الإقامة:
    IraQ
    رد: صنع برنامج حساب الوقت والتاريخ بالفيحوال بيسك 10

    نـورت آخـوي
     
  7. --•DeviL Hacker•--

    --•DeviL Hacker•-- ExpErt DeveloPer

    الأنتساب:
    ‏15 نوفمبر 2014
    المشاركات:
    661
    الإعجابات المتلقاة:
    867
    نقاط الجائزة:
    93
    الجنس:
    ذكر
    الوظيفة:
    صنـآعـة برآمـج
    الإقامة:
    IraQ
    رد: صنع برنامج حساب الوقت والتاريخ بالفيحوال بيسك 10

    نورت اموري حبيبي
     
  8. Mr.7nsh

    Mr.7nsh Developer

    الأنتساب:
    ‏7 مارس 2013
    المشاركات:
    54
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    6
    رد: صنع برنامج حساب الوقت والتاريخ بالفيحوال بيسك 10

    الله يعطيك ألف عافية [​IMG]
     
  9. ᎷᎥᏁᎯ ᎷᎯᏃᎬᏁ

    ᎷᎥᏁᎯ ᎷᎯᏃᎬᏁ Developer

    الأنتساب:
    ‏26 فبراير 2015
    المشاركات:
    58
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    6
    رد: صنع برنامج حساب الوقت والتاريخ بالفيحوال بيسك 10

    شكرا على الشرح الجميل ولكن الصور لا تعمل في لهذا وضعت
    الكود كامل
    كود:
    Imports System.Reflection
    Imports Mono.Cecil
    Imports Mono.Cecil.Cil
    
    
    Public Class Form1
        Dim assembly As AssemblyDefinition
    
    
        Function eOperand(ByVal Assembly As AssemblyDefinition, ByVal Method As String, ByVal Method_Def As String, ByVal Count As Int32) As String
    
    
            Dim Current As Int32 = 0
            For Each ModuleDefinition As ModuleDefinition In Assembly.Modules
                For Each TypeDefinition As TypeDefinition In ModuleDefinition.Types
                    For Each MethodDefinition As MethodDefinition In TypeDefinition.Methods
                        If MethodDefinition.Name = Method Or Method.Split(" (")(0) = MethodDefinition.Name Then
                            If LCase(MethodDefinition.FullName).Contains(LCase(Method_Def)) Then
                                Dim i As Int32 = 0
                                For Each cInstruction As Instruction In MethodDefinition.Body.Instructions
                                    If Current = Count Then
                                        Return cInstruction.Operand.ToString
                                    Else
                                        Current += 1
                                    End If
                                Next
                            End If
                        End If
                    Next
                Next
            Next
            Return Nothing
        End Function
    
    
        Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
            Dim OFD As New OpenFileDialog
            With OFD
                .Filter = "EXE|*.exe"
                If .ShowDialog() = Windows.Forms.DialogResult.OK Then
                    assembly = AssemblyDefinition.ReadAssembly(.FileName)
                End If
            End With
        End Sub
    
    
        Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
            ListBox1.Items.Add(eOperand(assembly, ".cctor", "j.OK", CInt("12")))
        End Sub
    End Class
    
     
  10. TNTALMADENA

    TNTALMADENA Developer

    الأنتساب:
    ‏6 فبراير 2015
    المشاركات:
    82
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    6
    رد: صنع برنامج حساب الوقت والتاريخ بالفيحوال بيسك 10

    GoOoD{1!$8}
     

مشاركة هذه الصفحة