Windows XPに新たに追加された機能であるログイン・ユザーアイコンをTASPLUS!の機能を使って、従来の Windows95/98/Me/NT4/2000でも使える環境にする事が可能、 ユーザごとに、のユザー・ディスクトップの設定機能を使い、TASPLUS!でユーザごと にオリジナルの画像とスタート文字の変わりにユーザ名や好きな名前に付け替えてXPテーマのもう一つの気分を楽しもう。
私は VB なので・・・・ Private Declare Function GetTickCount Lib "kernel32" () As Long
Private Sub Timer1_Timer() On Error GoTo ErrTime Dim RetCount As Long Dim h, m, s, ms As Integer RetCount = GetTickCount h = RetCount \ 1000 \ 60 \ 60 m = RetCount \ 1000 \ 60 - h * 60 s = RetCount \ 1000 - (h * 60 * 60 + m * 60) ms = RetCount Mod 1000 Text2.Text = Right(("0" & h), 2) & ":" _ & Right(("0" & m), 2) & ":" & Right(("0" & s), 2) Exit Sub ErrTime: Exit Sub