Der er forskellige grunde til at ændre tid og dato på en værtscomputer fra et Visual Basic-program . Måske du bygger tidszone management software eller netværk tidssynkronisering software. Selvom . NET framework ikke oprindeligt tillader ændre systemet tid fra Visual Basic , er det muligt at importere en indfødt Windows dynamisk forbundet bibliotek (DLL ) til at gøre arbejdet for dig . Brug af InteropServices og ComponentModel namespaces tillader dig at importere DLL, og påberåbe den eksterne metode. Instruktioner
1
Opret en ny fil i din Visual Basic-projekt og navngive den " SysTime.vb "
2
Kopier og indsæt følgende kode i den nye fil. : import SystemImports System.Runtime.InteropServicesImports System.ComponentModel
Class Systime
struktur SystemTimePublic år som ShortPublic måned ShortPublic dayOfWeek Som ShortPublic dag Som ShortPublic time som ShortPublic minut som ShortPublic sekund som ShortPublic millisekunder As ShortEnd Structure
Private Shared Function SetSystemTime ( Systime som SystemTime ByRef ), som Boolean
Public Shared Sub Set ( tid som SystemTime ) SysTime.SetSystemTime (tid ) End SubEnd Class
3
kalder funktionen ved at kopiere og indsætte følgende kode i de vigtigste loop af dit program : Dim setTimeTo som Systime . SystemTime ; setTimeTo.year = 0setTimeTo.month = 0setTimeTo.dayOfWeek = 0setTimeTo.day = 0setTimeTo.hour = 0setTimeTo.minute = 0setTimeTo.second = 0setTimeTo.milliseconds = 0SysTime.Set ( setTimeTo ) = 0
4
Skift nuller i det forrige trin til uanset tid, du ønsker at systemet tid til at være .