Программирование
Веб программирование

Узнаем время работы компьютера.

 
 

Код не большой, с использованием API функции.

На форму кинем Timer и Label

Public Class Form1

' Подключаем Dll

<Runtime.InteropServices.DllImport("kernel32.dll")> _

Private Shared Function GetTickCount() As UInteger ' Имя функции НЕ МЕНЯТЬ

End Function

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Dim D As Date = "0:00:00" ' Часы,минуты,секунды.

Label1.Text = "Компьютер работает : " & D.AddMilliseconds(GetTickCount) ' Выводим преобразованное время из миллисекунд
End Sub

End Class

Так-же прилагаю скриншот и сам исходник!

Скачать файл [106037 кб]


Есть вопросы? Спроси на нашем форуме!!
arkhramov20 [02.02.2013 12:09]

Для гаджета на рабочий стол, нужно научиться!

tayson72 [08.02.2013 15:27]

Мне программа понравилась, вот еще дополнение, я заметил, что при запуске загружается форма, а потом на ней появляется надпись, показывающая время. Решил это так: в свойствах формы зашел в СОБЫТИЯ(Значок молнии) и в группе "Поведение" напротив события Load изменил значение Form1Load на Timer1Tick, теперь форма загружается сразу с показом времени.



Оставлять комментарии можно только зарегистрированным




Предупреждение: Вся информация представлена исключительно в образовательных целях.
Ни авторы, ни администрация не несут ответственности в случае ее использования в противозаконных целях.