Visualizzare il tempo trascorso dall'ultimo avvio del sistema
Da Gambas-it.org - Wikipedia.
Versione del 13 ago 2012 alle 19:44 di Vuott (Discussione | contributi)
Per visualizzare il tempo trascorso dall'ultimo avvio del proprio sistema, si andrà a leggere il primo dato presente nel file: /proc/uptime. Otterremo qui questo risultato senza l'uso di Shell.
Private fl As File Public Sub Form_Open() fl = Open "/proc/uptime" For Read Watch End Public Sub File_Read() Dim q As String Dim qq As String[] q = File.Load("/proc/uptime") ' Raccogliamo solo il primo dato: qq = Split(q, " ") TextLabel1.text = qq[0] End