安卓開關機時間文件路徑記錄

『壹』 怎麼查看自己開機關機記錄

29

關注

第一步:你打開你的電腦「控制面板」
第二步:打開控制面板內的「管理工具」
第三步:打開管理工具內的「事件查看器」
第四步:打開左邊的「應用程序」右邊就會出現你操作電腦的具體時間。
第五步:點每天「信息」最早的那個時間就會看到具體事件ID17055就是
開關
機了。
你要清除就用
滑鼠
右鍵點左邊「應用程序」就會看到很多操作，你點清除所有事件，這時你右邊的所有操作
記錄

打開「我的電腦」，C盤Windows目錄下找到一個SchedLgU．txt。它是「計劃任務」的日誌，會忠實地記錄電腦計劃任務的執行情況，還有每次開機啟動Windows系統的信息。
查看上網記錄
在Windows＼History的文件夾里將自動保持上網記錄，最近的可以彎仔記錄99天的一切操作過程，包括去過什埋尺汪么網站、看過什麼圖片、打開過什麼文件等信息。
更簡單的方法就是打開IE瀏覽器，在地址欄的邊上有一個下拉的按鍵，點一下，就可以看到最近上網比較頻繁的網站了。
查看游戲記錄
在這個方面，windows本身辦法不多，只能求助於第三方軟體，例如程序監控專家、小孩電腦管制系統等軟體，它們可以記錄所有困數程序運行記錄和程序運行時間，也就可以對游戲情況做到了如指掌。

『貳』 安卓平板如何查看開關機記錄

安卓系統平板電腦部分設備可以查看到系統的「開機時間」。開機時間記錄使用設備的時間總時長。即便連續使用，也會積累時間算下去。查看記錄步驟如下：
（1）在主屏幕上輕按「設置」按鈕。或者，按下物理鏈瞎按鈕「Menu」，選擇「設置」。
（2）在設置的列表下，輕按選擇「關於本機」按鈕。
（3）然後，輕按「狀態消息」按鈕。
（粗喚神4）查看「開機時間」。
使用安卓系統的設備，在長時間不使用時，建議關機，不但可以省電還可以起到保護設備的作用。如果短時間離開，可以鎖屏，這樣也岩虧是保養設備的一種方式。系統上顯示的「開機時間」可以顯示使用的設備的時長。或者推算系統開機的時間。如果發現長時間沒有關機，則需要正常重新啟動一次。

『叄』 安卓手機開機、關機動畫分別在哪個文件夾下

前提：手機要ROOT提權，用R.E.管理器粘貼復制

開機畫面，一般是分為2屏，當然也有3屏的說法，不管怎樣，我這里說得就是最後的一屏，按照bootanimation的字面意思翻譯，大概也就是開機動畫的意思，那這就不說第幾屏了，直接用「開機動畫」這詞。

首先，開機動畫的地址：system\media\bootanimation.zip。。。要修改開機動畫就是修改bootanimation這個文件。如果說你的手機里沒有這個文件，那就是說明你用的是官方原始版本的rom開機動畫沒有被修改過，但這不礙事，沒有就放一個進去,到時候想換回最原始的開機畫面，也可以把bootanimation這個文件刪了。官方最原始的開機動畫在system\ framework\framework-res.apk\assets\images裡面,裡面主要是2張圖片，高手可以去研究一下，說不定通過這個文件可以用代碼實現動畫的過程。

接下來，說說bootanimation.zip這個文件的結構。bootanimation裡面主要包含一個desc.txt以及N個文件夾。而文件夾裡面放著的就是你要的開機動畫的圖片。decs.txt的作用就是指導系統如何去執行你的開機畫面。

下面繼續說說desc.txt這個文檔要怎麼寫。

先看例子，如果我的開機動畫要用到2個文件夾，分別是part1和part2,。。。。我希望開機的時候，先把part1裡面的圖片都播放一遍，然後再循環播放part2裡面的文件，直到進入系統。那麼decs.txt文檔的內容應該如下：

320 480 5

p 1 0 part1

p 0 0 part2

就這么多，現在解釋一下這些命令吧。

第一行，320 480是代表你屏幕的解析度，因為我們的胖6是320*480的，這就不多說了。後面的5是說：5幀每秒，不懂的可以這么理解，5是代表一秒鍾播放5張圖片。就這么簡單。

第二行，p 1 0 part1。p應該是play吧，也就是播放的意思。1是播放一次。0是空指令，就是什麼都不做。part1就是說，這條指令是針對part1這個文件夾的。整條指令的意思就是，播放part1裡面的圖片1次，然後什麼都不做，馬上進入下一條指令。

第三行，p 0 0 part2。p依然是播放。第一個0這里是代表循環播放，第二個0和上面第二條指令一樣，代表什麼也不做。part2也就不多說了。

至於為什麼第一個0為什麼是代表循環，只能這么說，這事國際慣例，就像用迅雷的時候，0代表不限制速度一樣，系統規定的，你知道就好，別糾結。

總結公式如下

第一條指令：屏幕的解析度（空格）播放頻率

第二條指令：p（空格）播放次數（空格）後續操作（空格）作用文件夾

第三條指令：同上

第N條指令：同上

屏幕解析度的格式是：寬（空格）高，320 480。。。播放頻率，上面已經說清楚了，至於到底要用多大的數字，視你開機動畫的張數而定，比如說，一共有100張圖片，開機時間是20秒，那麼100/20就是5。

播放次數，1是代表一次，0代表循環播放。如果要播放2次的話，就是就是打個2上去，應該是這樣吧，反正我是沒試過，只試過0和1.後續操作，0代表什麼都不做，直接進入下一條指令。10是代表稍作停頓。

至於文件夾裡面的圖片，比較簡單，首先，糾正一個說法，之前說必須要是png格式，經過我試驗證明，jpg格式的也可以，其他的有待試驗，不過只支持靜態圖片這點應該是真的，動態圖片同樣有待試驗。其次，關於圖片的尺寸，是不做要求的，只要在txt文檔里寫好手機的解析度即可，開機的時候系統會自動適配。其其次要按播放循序命名，建議用5位數字，比如說，第一張圖片是00010，第二張就是00020.。。。。為什麼要從00010開始，而不是00001？因為這事預防以後要在第一張和第二張中間再插一張圖片進去的話，就可以把插進去的圖片命名為00011，在00010之後，00020之前。就這么簡單。

至於圖片那裡來嘛，當然是自己網上找啦，也可以下載別人的bootanimation，然後修改一下。最後就是壓縮包了，把需要用到的part文件夾跟decs.txt打包成zip格式，必須是zip，不能是rar，而且打包的時候壓縮方式要選擇「存儲」模式。然後改名成為bootanimation.zip，復制到SD卡里，再通過RE文件管理器復制到system\media\下面，重啟。

要注意一下,bootanimation不能太大，大了會卡，一般不要超過3M。

『肆』 如何查開機記錄

win7系統能查開機記錄么
魔方也可以，不用裝任何軟體也能查，方法是打開控制面板，點擊歷兆「系統和安全」，再點擊「管理工具」下的「查帆猛看事件日誌」，事件日誌打開後點擊左側的「Windows日誌」，再點擊「系統」，看看日期和時間，突然變化（某一天的第一次）的就是開機時間，選中後下面還有詳細內容，事件ID是12
如何查看自己電腦的開機記錄？？？
滑鼠右鍵點擊：桌面上「我的電腦」裡面的管理，選擇系統工具裡面的事件查看器，裡面的系統可以看到什麼時候開機什麼時候關機。。。。
電腦怎麼查看開機記錄
XP下，控制面板-管理工具-事件查看器-系統

來源叫：eventlog，這個能記錄你開機時間和關機時間的。

不過你媽要是能從這知道，我勸你還是死了玩電腦的心吧····可憐的孩子
查看電腦開機記錄
在windows的系統目錄下有個記錄任務計劃服務的SchedLgu.txt文本文件，雙擊調用記事本打開。
如何查看電腦開關機記錄
(一）如果你只是想查看一下，從昨天關機到今天開機之間有沒有人使用我的計算機，在「開始」菜單的運行」中輸入「eventvwr.msc」，或者是按下"開始菜單"-"程序"-"管理工具"-"事件查看器",打開事件查看器，在左側窗口中選擇「系統」，從右側系統事件中查找事件ID為6005、6006的事件（事件ID號為6005的事件表示事件日誌服務已啟動，即開機，同理事件ID：6006表示關機），它們對應的時間就分別是開機時間和關機時間。(二）如果你覺得從這么多事件中找開關機事件太費事，你可以使用「篩選」來使內容簡潔。在事件查看器的「查看」菜單中選擇「篩選」選項，在屬性對話框中選擇「篩選器」選項卡，並在其中勾選「信息」、「警告」、「錯誤」三項，在「事件來源」下拉列表中選擇「eventlog」，單擊「確定」按鈕後，系統事件中的內容就少了很多，我們可以輕易找到最近的開關機時間。(三）如果你依舊覺得太費事，那隻好使用必殺技了。在「開始」菜單中的「運行」中輸入「C:\WINDOWS\schedlgu.txt」，在打開的schedlgu.txt文件中有「任務計劃程序服務肢轎租」已啟動於和「任務計劃程序服務」已退出於的時間，分別對應著開機和關機時間，是不是很方便呢？天天備案也不難。(四）如果你想每一次開關機都能清楚地記錄在案，那可以用「腳本+批處理」的方法。不過你要親自動手了，我們使用「腳本+批處理」的方式來實現。只需在開機、關機腳本上添加兩個記錄時間的批處理命令，讓它們隨系統啟動或關閉記錄當時的時間到C:\aaa.txt文件中。首先新建兩個文本文檔，分別用來記錄開機和關機信息，輸入以下的命令，然後另存為「.bat」文件就可以了。其中開機批處理（start.bat）如下：而關機批處理(shutdown.bat)命令只要把start.bat中的「***開機記錄***」改為「***關機記錄***」即可，其餘不變。將上面的兩個批處理命令做好後，在「開始」菜單中的「運行」中輸入gpedit.msc，打開組策略，依次找到「計算機配置→windows設置→ 腳本(啟動和關機)」，雙擊「啟動」，在屬性對話框中單擊「添加」按鈕，並在「腳本名」一欄中填入「start.bat」的絕對路徑，單擊「確定」按鈕。同理設置好關機腳本。這樣可以了，開關機做個實驗，打開C:\aaa.txt文件，是不是記錄了你剛才的關機和開機時間呢？
怎麼查詢自己電腦的開機關機時間記錄
打開「控制面板」，雙擊「管理工具」，然後打開「事件查看器」，在左邊的窗浮中選擇「系統」選項。單擊滑鼠右鍵，在dan出的快捷菜單中選擇「屬性」，在打開的「系統屬性」窗口中選擇「篩選器」選項卡，在「事件類型」下面選中「信息」復選項，並在「事件來源」列表中選擇「eventlog」選項，繼續設定其他條件後，單擊「確定」按鈕，即可看到需要的事件記錄了。雙擊某條記錄，如果描述信息為「事件服務已啟動」，那就代表計算機開機或重新啟動的時間，如果描述信息是「事件服務已停止」，即代表計算機的關機時間。開始/控制面板/管理工具/事件查看器

左邊選"系統",然後看右邊的事件,事件為6005的為開機,6006的為關機

如果你是電腦盲,覺得上面這個方法麻煩,就用下面這個方法:

開始/運行/輸入C:\WINDOWS\schedlgu.txt
怎麼查看win7開機使用記錄？？ 15分
右鍵我的電腦--設備管理器-廠系統工具--事件查看器--Windows日誌--系統，看圖吧
如何查看筆記本電腦的開關機歷史記錄？
1. 首先打開「我的電腦」，然後右擊左面「計算機」圖標，打開「管理」選項，如下圖：

2. 在打開的「計算機管理」管理界面中，依次點擊左面的「系統工具」——事件查看器，如下圖：

3. 單擊「Windows日誌」——「系統」 ，然後選擇打開右邊的「篩選當前日記」，如下圖：

4. 在「篩選當前日誌」窗口中，事件來源選擇「eventlog」，在如下圖位置輸入「6005,6006」。

備註：eventlog標示開關，而6005表示開機，6006表示關機。

5. 輸好後點擊確定，在主要窗口就會篩選出電腦最近時間的開機關機情況，如下圖：
WIN7下怎麼查看系統開關機記錄
方法一：

通過查看事件日誌的方法。

1、打開win7系統的「開始」菜單的運行」，輸入「eventvwr.msc」，打開事件查看器；

2、然後在左側窗口中選擇「系統」，從右側系統事件中查找事件ID為6005、6006的事件(事件ID號為6005的事件表示事件日誌服務已啟動，即開機，同理事件ID：6006表示關機)，對應的時間就分別是開機時間和關機時間即可。

3、如覺得從這么多事件中找開關機事件很繁瑣，可使用「篩選」功能，在事件查看器的「查看」菜單中選擇「篩選」選項，也即是創建自定義視圖。

3、在屬性對話框中選擇「篩選器」選項卡，並在其中勾選「信息」、「警告」、「錯誤」三項，在「事件來源」下拉列表中選擇「eventlog」，單擊「確定」按鈕後，系統事件中的內容就少很多，可輕易找到最近的開關機時間。

方法二：

打開win7系統中「開始」菜單中的「運行」，然後輸入「C:\WINDOWS\schedlgu.txt」，在打開的schedlgu.txt文件中有「任務計劃程序服務」已啟動於……和「任務計劃程序服務」已退出於……的時間，裡面就有分別對應著開機和關機時間。

方法三：

利用腳本每天記錄，以後打開文本文檔直接看就行，具體方法如下：舉個例子，記錄到E盤的開關機時間.txt里。

1、首先，新建一個文本文檔，改名稱為「kai.bat」(別忘了改擴展名)，右鍵編輯打開，內容輸入下面 2個分割線中間的內容。

@echo off

echo %date% %time% 開機 >>E:\開關機時間.txt。

2、再新建一個文本文檔，改名稱為「guan.bat」(別忘了改擴展名)，右鍵廠輯打開，內容輸入內容。

@echo off

echo %date% %time% 關機 >>E:\開關機時間.txt。

3、接著在運行對話框中輸入「gpedit.msc」，打開組策略，展開計算機配置，Windows設置，雙擊啟動，顯示文件，然後把kai.bat復制進去。

4、然後在啟動屬性那裡點添加，瀏覽，把kai.bat添加進去，同理，把guan.bat按上述步驟添加到關機那裡就可。

5、成功，以後可直接到E盤那裡去看，文檔裡面就會全列出來。

『伍』 怎麼查手機上次使用(開機)時間

查看方法如下：

1、首先，點擊手機屏幕左下角的菜單鍵（不在手機屏幕上，在手機外殼上），在彈出的菜單中選擇「系統設置」。

『陸』 怎樣查手機開機使用記錄啊

查詢手機使用痕跡方法如下：

1、以困橘山魅族手機為例，我們打開手機主頁，點擊汪中撥號。

『柒』 安卓手機管家能記錄手機開關機時間嗎

您好，親愛的管家用戶，目前管家僅能顯示您開機所用時間哦，您可以在開機後通知欄中查看您本次開機時長，感謝您對管家的支持。

『捌』 安卓系統超級用戶如何查看上次關機時間

看系統日誌！！則廳！ 要不就自己寫個BroadcaseReceiver，當關 機的時候調用他，進指局行相應的處理就行了！終端的話： 輸入命令查看其申請了孫逗隱什麼許可權： adb shell mpsys p ackage <包名>，或者反編譯的apk ，查看其AndroidManifest.xml文件

『玖』 怎麼查看手機最近開機時間

以安卓手機為例，查詢手機開機運行時間的方法如下：

1、首先，在手機桌面上找到設置菜單命令；接著在設置首頁最上方點擊我的設備。

2、然後選擇全部參數；然後最下方的狀態信息，點擊可以查看本機號碼、信號；這里邊就可以查看到手機的已開機時間了，「已開機時間」這一項就是手機開機運行時間。
1、在手機撥號界面，輸入*#06# 查詢IEMI號。

2、查詢到IMEI號後，按住IMEI號，進行復制。

3、找到手機中的會員服務，打開。

4、選擇保修查詢。

5、點擊查詢進入查詢頁面，按住粘貼剛剛復制的IMEI號，點擊查詢。

6、這里可能會有兩種結果： 1）查詢不到保修期，說明你這個是新機，保修信息還沒到華為的系統。 2）查詢到保修期，根據保修期往前推算一年，可以知道第一次激活的日期，就可以判斷你激活的時候是不是第一次激活。
如果想要查看一下手機上次的開機時間，了解手機開機後運行了多長時間，這時該怎麼樣來查詢呢？下面就與大家一起分享一下查看的方法吧。

開啟分步閱讀模式
工具材料：
小米手機
操作方法
01
首先我們按一下小米手機的電源按鈕，解鎖當前的手機屏幕。

02
接下來我們左右滑動屏幕找到小米手機的「設置」圖標

03
點擊後打開小米手機的設置頁面，在頁面中我們點擊「我的設備」菜單項。

04
在打開的我的設備頁面中，點擊下面的「全部參數」菜單項。

05
這時就會打開全部參數頁面，在頁面中向下拉動屏幕，找到「狀態信息」菜單項。

06
在打開的狀態信息頁面中，可以看到「已開機時間」菜單項，在這里可以看到當前手機上次開機到現在的時間了。

『拾』 Android：怎樣在代碼中獲得平板的開關機時間

這個代碼分為三個功能，一是讓程序隨系統自啟動、二是在關機時（即退出本程序時）記錄關機時間、三是本程序啟動時顯示前三次的關機時間。
一：讓程序隨系統自啟動應該就不用說了吧，簡單
二：關機記錄時間凳明攔可以在本程序的unload模塊中寫下記錄過程，即 時間變數=time 即可，當然還要同時保存到某個文件或注冊表的三個固定容器中，保存時注意三個位置的替換即可（刪除第一個時間、將第二個移到第一個、第三個移到第二個、將本次記錄的時間寫到第三個位置）。
三：啟動程序顯示前三次關機時間也非常簡單，顯示時就將三個顯示控制項的caption等於上面第二條的這三個時間即可。
明白了嗎，你這個棗胡代碼實現起來確槐配是非常簡單的，一點都不難哦。
代碼如下，自己注意安排控制項哦【在默認form1窗體上載入Label1(0)、Label1(1)、Label1(2)、text1(0)、text1(1)、text1(2)、text2 、timer1 】
Dim a As String, b As String, c As String
Private Const REG_SZ As Long = 1
Private Const REG_DWORD As Long = 4
Private Const HKEY_CLASSES_ROOT = &H80000000
Private Const HKEY_CURRENT_USER = &H80000001
Private Const HKEY_LOCAL_MACHINE = &H80000002
Private Const HKEY_USERS = &H80000003
Private Const ERROR_NONE = 0
Private Const ERROR_BADDB = 1
Private Const ERROR_BADKEY = 2
Private Const ERROR_CANTOPEN = 3
Private Const ERROR_CANTREAD = 4
Private Const ERROR_CANTWRITE = 5
Private Const ERROR_OUTOFMEMORY = 6
Private Const ERROR_INVALID_PARAMETER = 7
Private Const ERROR_ACCESS_DENIED = 8
Private Const ERROR_INVALID_PARAMETERS = 87
Private Const ERROR_NO_MORE_ITEMS = 259
Private Const KEY_ALL_ACCESS = &H3F
Private Const REG_OPTION_NON_VOLATILE = 0
Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Private Declare Function RegCreateKeyEx Lib "advapi32.dll" Alias "RegCreateKeyExA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal Reserved As Long, ByVal lpClass As String, ByVal dwOptions As Long, ByVal samDesired As Long, ByVal lpSecurityAttributes As Long, phkResult As Long, lpdwDisposition As Long) As Long
Private Declare Function RegOpenKeyEx Lib "advapi32.dll" Alias "RegOpenKeyExA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal ulOptions As Long, ByVal samDesired As Long, phkResult As Long) As Long
Private Declare Function RegQueryValueExString Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, ByVal lpData As String, lpcbData As Long) As Long
Private Declare Function RegQueryValueExLong Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Long, lpcbData As Long) As Long
Private Declare Function RegQueryValueExNULL Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, ByVal lpData As Long, lpcbData As Long) As Long
Private Declare Function RegSetValueExString Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, ByVal lpValue As String, ByVal cbData As Long) As Long
Private Declare Function RegSetValueExLong Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpValue As Long, ByVal cbData As Long) As Long
Private Declare Function RegDeleteKey& Lib "advapi32.dll" Alias "RegDeleteKeyA" (ByVal hKey As Long, ByVal lpSubKey As String)
Private Declare Function RegDeleteValue& Lib "advapi32.dll" Alias "RegDeleteValueA" (ByVal hKey As Long, ByVal lpValueName As String)
Function SetValueEx(ByVal hKey As Long, sValueName As String, lType As Long, vValue As Variant) As Long
Dim lValue As Long
Dim sValue As String
Select Case lType
Case REG_SZ
sValue = vValue
SetValueEx = RegSetValueExString(hKey, sValueName, 0&, lType, sValue, Len(sValue) * 2)
Case REG_DWORD
lValue = vValue
SetValueEx = RegSetValueExLong(hKey, sValueName, 0&, lType, lValue, 4)
End Select
End Function
Function QueryValueEx(ByVal lhKey As Long, ByVal szValueName As String, vValue As Variant) As Long
Dim cch As Long
Dim lrc As Long
Dim lType As Long
Dim lValue As Long
Dim sValue As String
On Error GoTo QueryValueExError
lrc = RegQueryValueExNULL(lhKey, szValueName, 0&, lType, 0&, cch)
If lrc <> ERROR_NONE Then Error 5
Select Case lType
Case REG_SZ:
sValue = String(cch, 0)
lrc = RegQueryValueExString(lhKey, szValueName, 0&, lType, sValue, cch)
If lrc = ERROR_NONE Then
vValue = Left(sValue, cch - 1)
Else
vValue = Empty
End If
Case REG_DWORD:
lrc = RegQueryValueExLong(lhKey, szValueName, 0&, lType, lValue, cch)
If lrc = ERROR_NONE Then vValue = lValue
Case Else
lrc = -1
End Select
QueryValueExExit:
QueryValueEx = lrc
Exit Function
QueryValueExError:
Resume QueryValueExExit
End Function
Private Function CreateNewKey(lPredefinedKey As Long, sNewKeyName As String)
Dim hNewKey As Long
Dim lRetVal As Long
lRetVal = RegCreateKeyEx(lPredefinedKey, sNewKeyName, 0&, vbNullString, REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, 0&, hNewKey, lRetVal)
RegCloseKey (hNewKey)
End Function
Private Function SetKeyValue(lPredefinedKey As Long, sKeyName As String, sValueName As String, vValueSetting As Variant, lValueType As Long)
Dim lRetVal As Long
Dim hKey As Long
lRetVal = RegOpenKeyEx(lPredefinedKey, sKeyName, 0, KEY_ALL_ACCESS, hKey)
lRetVal = SetValueEx(hKey, sValueName, lValueType, vValueSetting)
RegCloseKey (hKey)
End Function
Private Function QueryValue(lPredefinedKey As Long, sKeyName As String, sValueName As String)
Dim lRetVal As Long
Dim hKey As Long
Dim vValue As Variant
lRetVal = RegOpenKeyEx(lPredefinedKey, sKeyName, 0, KEY_ALL_ACCESS, hKey)
lRetVal = QueryValueEx(hKey, sValueName, vValue)
QueryValue = vValue
RegCloseKey (hKey)
End Function
Private Sub Form_Load()
SetKeyValue HKEY_LOCAL_MACHINE, "software\microsoft\windows\currentversion\run", "jilu", App.Path & App.EXEName & ".exe", REG_SZ
Text2.Visible = False
If QueryValue(HKEY_CURRENT_USER, "Software\jilu", "on") = "" Then
CreateNewKey HKEY_CURRENT_USER, "Software\jilu"
SetKeyValue HKEY_CURRENT_USER, "Software\jilu", "on", "1", REG_SZ
SetKeyValue HKEY_CURRENT_USER, "Software\jilu", "off", "0", REG_SZ
Text2.Visible = True
End If
If App.PrevInstance = True Then
SetKeyValue HKEY_CURRENT_USER, "Software\jilu", "off", "0", REG_SZ
End
End If
If QueryValue(HKEY_CURRENT_USER, "Software\jilu", "1") <> "" Then a = QueryValue(HKEY_CURRENT_USER, "Software\jilu", "1") Else a = "沒有記錄"
If QueryValue(HKEY_CURRENT_USER, "Software\jilu", "2") <> "" Then b = QueryValue(HKEY_CURRENT_USER, "Software\jilu", "2") Else b = "沒有記錄"
If QueryValue(HKEY_CURRENT_USER, "Software\jilu", "3") <> "" Then c = QueryValue(HKEY_CURRENT_USER, "Software\jilu", "3") Else c = "沒有記錄"
Text1(0).Text = a: Text1(1).Text = b: Text1(2).Text = c
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = 1: Me.Hide
SetKeyValue HKEY_CURRENT_USER, "Software\jilu", "off", "1", REG_SZ
End Sub
Private Sub Form_Unload(Cancel As Integer)
Dim d As String, x As String, y As String
d = CStr(Now())
If QueryValue(HKEY_CURRENT_USER, "Software\jilu", "2") <> "" Then x = QueryValue(HKEY_CURRENT_USER, "Software\jilu", "2") Else x = "沒有記錄"
If QueryValue(HKEY_CURRENT_USER, "Software\jilu", "3") <> "" Then y = QueryValue(HKEY_CURRENT_USER, "Software\jilu", "3") Else y = "沒有記錄"
SetKeyValue HKEY_CURRENT_USER, "Software\jilu", "1", x, REG_SZ
SetKeyValue HKEY_CURRENT_USER, "Software\jilu", "2", y, REG_SZ
SetKeyValue HKEY_CURRENT_USER, "Software\jilu", "3", d, REG_SZ
End Sub
Private Sub Timer1_Timer()
If QueryValue(HKEY_CURRENT_USER, "Software\jilu", "off") = "0" Then Me.Show
End Sub