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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية تغير رسائل الخطأ؟ noway 4 164 12-01-17, 02:05 AM
آخر رد: يسرى7
  سئوال بخصوص التاريخ السيد الجوهري 2 109 08-01-17, 04:01 PM
آخر رد: السيد الجوهري
  زيادة السنين في أداة التاريخ DateTimePicker أسامة السالمي 2 112 06-01-17, 09:12 PM
آخر رد: أسامة السالمي
  [VB.NET] تنسيق التاريخ داخل داتاجريد tifagreet 5 173 12-12-16, 11:04 AM
آخر رد: tifagreet
  [VB.NET] اضافة التاريخ في الطباعة في الريبورت فيور hglogtd 8 169 08-12-16, 08:35 PM
آخر رد: ابراهيم النعيمي
  [سؤال] تغير لون كتابة التيكست بوكس ؟ Mido9 5 2,577 30-11-16, 10:16 PM
آخر رد: omferas
  [VB.NET] خطأ في التاريخ tifagreet 2 107 16-11-16, 04:02 PM
آخر رد: السرور
  [VB.NET] تحويل التاريخ لسلسلة نصية tifagreet 1 134 01-11-16, 01:28 PM
آخر رد: ممدوح
  سؤال بسيط في فصل التاريخ عن الوقت فراس صلاح 3 189 19-10-16, 04:17 AM
آخر رد: mhmd_911
  [VB.NET] ما هو الخطأ في هذا الكود ... وكيف يمكن تخزين التاريخ abo.alaa315 3 195 07-10-16, 03:33 PM
آخر رد: tifagreet

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


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