تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كيف تغير التاريخ
#1
كيف تغير التاريخ فى الكمبيوتر
الرد }}}}
تم الشكر بواسطة:
#2
كود :
#Region "Set the date and time"
    Public Structure SYSTEMTIME
        Dim wYear As UInt16
        Dim wMonth As UInt16
        Dim wDayOfWeek As UInt16
        Dim wDay As UInt16
        Dim wHour As UInt16
        Dim wMinute As UInt16
        Dim wSecond As UInt16
        Dim wMilliseconds As UInt16
    End Structure
    Declare Function GetSystemTime Lib "Kernel32.dll" _
     (ByRef lpSystemTime As SYSTEMTIME) As UInt32

    Declare Function SetSystemTime Lib "Kernel32.dll" _
     (ByRef lpSystemTime As SYSTEMTIME) As UInt32

    Public Sub SetTime(ByVal d As Date)
        'التعديل على توقيت جرينتش

        Dim st As New SYSTEMTIME
        GetSystemTime(st)


        st.wDay = d.Day ' اليوم
        st.wMonth = d.Month ' الشهر
        st.wYear = d.Year ' السنة
        st.wHour = d.Hour ' الساعة24
        st.wMinute = d.Minute ' الدقائق
        'st.wSecond = d.Second ' الثواني
        SetSystemTime(st)

    End Sub
#End Region

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

        SetTime(Date.UtcNow.AddHours(+1))
    End Sub
الرد }}}}


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] تغير IPAddress ابو روضة 2 59 16-11-17, 09:16 PM
آخر رد: ابو روضة
  كيف اجعل طريقة ادخال التاريخ صحيحه ومحددة الج نرال 6 177 12-11-17, 06:22 PM
آخر رد: الج نرال
  طلب كود تغير الارقام حسب السنة ahmedmansour 3 84 06-11-17, 09:48 PM
آخر رد: ahmedmansour
  [سؤال] طلب مساعدة في التاريخ hikmat 2 80 03-11-17, 06:20 PM
آخر رد: Amir_alzubidy
  تغير لون ال button اعتمادا على البيانات من قاعده البيانات Rabeea Qbaha 5 120 03-11-17, 12:31 AM
آخر رد: Rabeea Qbaha
  التاريخ ميلادي و التاريخ هجري العيدروس 8 108 31-10-17, 09:34 PM
آخر رد: العيدروس
  العمليات على التاريخ abdulla2 3 119 17-10-17, 02:43 AM
آخر رد: abdulla2
  تغير حجم شاشات البرنامج عند العمل على شاشات اخرى nassery99 3 131 16-10-17, 12:42 PM
آخر رد: silverlight
  [VB.NET] كيف تفريغ رقم التاريخ (اليوم فقط) في Text Box من Data Time Picker abomo3ath 2 127 13-10-17, 10:33 AM
آخر رد: abomo3ath
  [VB.NET] اريد كود للكشف عن تغير عنوان الشبكة e-coder 0 49 23-09-17, 03:21 AM
آخر رد: e-coder

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


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