Ci sono vari motivi per modificare l'ora e la data su un computer host da un'applicazione Visual Basic . Forse si sta costruendo il software di gestione del fuso orario o il software di sincronizzazione dell'ora di rete . Anche se il quadro . NET non in modo nativo consente la modifica dell'ora di sistema da Visual Basic , è possibile importare un Windows libreria nativa collegate dinamicamente ( DLL) per fare il lavoro per voi . Utilizzando le InteropServices e spazi dei nomi ComponentModel consente di importare la DLL , e richiama il metodo esterno . Istruzioni
1

Creare un nuovo file nel progetto Visual Basic e il nome " SysTime.vb "
2

Copia e incolla il seguente codice nel nuovo file . : importazioni SystemImports System.Runtime.InteropServicesImports System.ComponentModel

Classe SysTime

Struttura anno SystemTimePublic Come mese ShortPublic Come dayOfWeek ShortPublic Come il giorno ShortPublic Come ora ShortPublic Come minuto ShortPublic come secondo ShortPublic come millisecondi ShortPublic As ShortEnd Struttura

privata condivisa SetSystemTime Function ( systime come SystemTime ByRef ) come booleano

Public Shared Sub set ( tempo come SystemTime ) SysTime.SetSystemTime ( tempo ) Fine SubEnd Classe
3

Chiama la funzione di copia e incolla il seguente codice nel ciclo principale del programma : Dim setTimeTo come SysTime . SYSTEMTIME ; setTimeTo.year = 0setTimeTo.month = 0setTimeTo.dayOfWeek = 0setTimeTo.day = 0setTimeTo.hour = 0setTimeTo.minute = 0setTimeTo.second = 0setTimeTo.milliseconds = 0SysTime.Set ( setTimeTo ) = 0
4

Cambiare gli zeri nel passaggio precedente per tutto il tempo che vuoi l'ora di sistema sia.