Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1552 connectés 

 


Dernière réponse
Sujet : [Visual Basic] Horloge Windows
Bendes Colle ce code dans une form

Code :
  1. Private Type SYSTEMTIME
  2.     wYear As Integer
  3.     wMonth As Integer
  4.     wDayOfWeek As Integer
  5.     wDay As Integer
  6.     wHour As Integer
  7.     wMinute As Integer
  8.     wSecond As Integer
  9.     wMilliseconds As Integer
  10. End Type
  11. Private Declare Function SetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) As Long
  12. Private Sub Form_Load()
  13.     Dim lpSystemTime As SYSTEMTIME
  14.     lpSystemTime.wYear = 2000
  15.     lpSystemTime.wMonth = 1
  16.     lpSystemTime.wDayOfWeek = -1
  17.     lpSystemTime.wDay = 24
  18. ' Ici tu insère l'heure actuelle ou essayes sans initialiser ces variables...
  19.     lpSystemTime.wHour = 23
  20.     lpSystemTime.wMinute = 26
  21.     lpSystemTime.wSecond = 0
  22.     lpSystemTime.wMilliseconds = 0
  23.     'set the new time
  24.     SetSystemTime lpSystemTime
  25. End Sub

 

[edtdd]--Message édité par Bendes--[/edtdd]


Votre réponse
Nom d'utilisateur    Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !
Le ton de votre message                        
                       
Votre réponse


[b][i][u][strike][spoiler][fixed][cpp][url][email][img][*]   
 
   [quote]
 

Options

 
Vous avez perdu votre mot de passe ?


Vue Rapide de la discussion
Bendes Colle ce code dans une form

Code :
  1. Private Type SYSTEMTIME
  2.     wYear As Integer
  3.     wMonth As Integer
  4.     wDayOfWeek As Integer
  5.     wDay As Integer
  6.     wHour As Integer
  7.     wMinute As Integer
  8.     wSecond As Integer
  9.     wMilliseconds As Integer
  10. End Type
  11. Private Declare Function SetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) As Long
  12. Private Sub Form_Load()
  13.     Dim lpSystemTime As SYSTEMTIME
  14.     lpSystemTime.wYear = 2000
  15.     lpSystemTime.wMonth = 1
  16.     lpSystemTime.wDayOfWeek = -1
  17.     lpSystemTime.wDay = 24
  18. ' Ici tu insère l'heure actuelle ou essayes sans initialiser ces variables...
  19.     lpSystemTime.wHour = 23
  20.     lpSystemTime.wMinute = 26
  21.     lpSystemTime.wSecond = 0
  22.     lpSystemTime.wMilliseconds = 0
  23.     'set the new time
  24.     SetSystemTime lpSystemTime
  25. End Sub

 

[edtdd]--Message édité par Bendes--[/edtdd]

vinsle Merci,j'ai essayé le lien et j'ai fait un copié collé de l'api mais ca ne marche pô, y a pas un moyen + simple et + direct de changer la date du systeme (parceke c'est surtout ca ke je veux changer et non l'heure.
macray Tu va sur ce sîte:
www.vbfrance.com/visitelien.asp?Val=59&ValB=L
 
voici les API qui te faut : Kernel32.dll
 

  • Retourne les heures:

GetSystemtime (heure système du PC)
GetLocalTime (heure locale)
 

  • permet de changer les heures:

SetLocaltime
SetSystemTime
 
Tu as aussi www.vbfrance.com
Allez salut et bonne chance
 
 :hello:

macray Attend un peu je te cherche les API !
vinsle Je cherche la commande ki permet de modifier la date et l'heure de l'horloge windows sous visual basic, merci d'avance!

Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR