Det finns olika skäl för att ändra datum och tid på en värddator från ett Visual Basic-program . Kanske du bygger programvara tidszon ledning eller nätverk tidssynkronisering programvara . Även om . NET framework inte native tillåter ändra systemet tid från Visual Basic , är det möjligt att importera en äkta Windows dynamiskt länkade bibliotek ( DLL ) för att göra jobbet åt dig . Använda Interopservices och namnrymder ComponentModel tillåter dig att importera DLL , och anropa den externa metoden . Instruktioner
1
Skapa en ny fil i din Visual Basic-projekt och döp den till " SysTime.vb "
2
Kopiera och klistra in följande kod i den nya filen . : importen SystemImports System.Runtime.InteropServicesImports System.ComponentModel
klass SysTime
Struktur SystemTimePublic år Som ShortPublic månad Som ShortPublic dayOfWeek Som ShortPublic dag Som ShortPublic timme som ShortPublic minut som ShortPublic sekund som ShortPublic millisekunder ShortEnd Struktur
Delad Private Function SetSystemTime ( systime som SystemTime byRef ) As Boolean
Public Shared Sub set ( tid som SystemTime ) SysTime.SetSystemTime ( tid ) Avsluta SubEnd klass
3
Ring funktionen genom att kopiera och klistra in följande kod i huvudslingan i ditt 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
Ändra nollor i föregående steg till vilken tid du vill att systemet tid att vara .
