添加下列代碼即可，一個(gè)如融化屏幕般的屏保Option Explicit Private Declare Function GetDC Lib quotuser32quot _ByVal hWnd As Long As Long Private Declare Function ReleaseDC Lib quotuser32quot _ByVal hWnd As Long；急急急！謝謝大家的幫忙我急要一個(gè)屏幕保護(hù)程序的源代碼文件，希望大家能幫幫我 急急急！謝謝大家的幫忙我急要一個(gè)屏幕保護(hù)程序的源代碼文件，希望大家能幫幫我 展開(kāi) #xE768 我來(lái)答。

這是一個(gè)特別逗的屏保，畫(huà)面就是一只小狗狗跑來(lái)跑去然后舔屏幕的樣子，還是蠻有趣的，獵奇的小伙伴可以去設(shè)置看看06色彩時(shí)鐘 The Colour Clock是一個(gè)色彩時(shí)鐘，它會(huì)將時(shí)間對(duì)應(yīng)到十六進(jìn)制顏色代碼，所以每一秒都會(huì)有一個(gè)；在WndProc這個(gè)回調(diào)函數(shù)里加個(gè)鼠標(biāo)移動(dòng)消息WM_MOUSEMOVE的判斷即可由于這個(gè)消息很靈敏，你感覺(jué)鼠標(biāo)沒(méi)有動(dòng)，實(shí)際也退出了所以，在這個(gè)消息下面再加上一個(gè)移動(dòng)距離的判斷即可距離越短，鼠標(biāo)移動(dòng)時(shí)退出檢測(cè)就越靈敏例如。

設(shè)置關(guān)閉屏保的程序代碼 CDialogEndDialogIDOK單擊“Add Handler”，然后單擊“Edit Existing”，在光標(biāo)提示處添加代碼如下設(shè)置關(guān)閉屏保的程序代碼 CDialogEndDialogIDOK九 添加WM_Destory的消息響應(yīng)函數(shù)；我的做法是，每個(gè)星星都是一個(gè)sprite，在構(gòu)造函數(shù)里通過(guò)graphicsdrawCircle畫(huà)一個(gè)白色的圓，然后在主類(lèi)中控制其位置和大小x， y， scaleX， scaleY，不斷向屏幕外側(cè)移動(dòng)，并且不斷增大尺寸下面是原代碼spaceaspack。

BackColor = vbBlack SetWindowPos Mehwnd， HWND_TOPMOST， 0， 0， ScreenWidth， ScreenHeight， WM_SHOWWINDOW End Sub #39如果要設(shè)為屏保，需將生成的exe文件后綴改為scr，保存到system32中，并在電腦中選擇此屏保。

代碼滾動(dòng)字幕怎么設(shè)置

1在Cydia里搜索下載并安裝LiveWallpaper2該插件以分割視圖模式來(lái)顯示圖片，用戶(hù)可以選擇對(duì)其進(jìn)行自定義設(shè)置用戶(hù)選定之后，點(diǎn)擊 Done 按鍵，系統(tǒng)會(huì)對(duì)圖片進(jìn)行處理并將其設(shè)置成為 iPhone 主屏幕的滾動(dòng)壁紙二設(shè)置飄落。

把得到的路徑也保存到注冊(cè)表中，并讓屏保啟動(dòng)時(shí)讀picdir的值，picdir等于quotnoquot時(shí)的代碼筆者已實(shí)現(xiàn)了，picdir不等于quotnoquot時(shí)的代碼由讀者實(shí)現(xiàn)也就是讓讀者實(shí)現(xiàn)一個(gè)能把picdir目錄里的圖片輪流顯示的屏保程序二 實(shí)現(xiàn)方法首先介紹幾個(gè)。

一SCRNSAVEBAS 此模塊文件包含四個(gè)子程序 HideMouse，ShowMouse，EndScrnsave，Main前三個(gè)子程序分別用于隱藏鼠標(biāo)光標(biāo)重新顯示鼠標(biāo)光標(biāo)和結(jié)束屏幕保護(hù)程序返回Windows當(dāng)在Windows控制面板的桌面對(duì)話(huà)框中對(duì)屏幕保護(hù)程序進(jìn)行“。

畫(huà)一個(gè)圓當(dāng)做屏保圖案坐標(biāo)是x，y 大小是d public void run TODO Autogenerated method stub whiletrue ifxlt=0 dir=rannextInt8whiledir==0dir==3dir==5dir=rannextInt8。

代碼僅供參考，BAT文件和屏保程序放在一起echo offAfor L %%a in 59，1，0 do echo 60秒后將運(yùn)行屏保1echo 還剩余 %%a 秒ping n 2 localhost 1nul 2nulclsstart 屏保1scrfor L %%a in 59。

代碼滾動(dòng)屏保怎么設(shè)置

1、很簡(jiǎn)單程序form1需要一個(gè)計(jì)時(shí)器timer1一個(gè)標(biāo)簽label1，以下是代碼Dim LOrR As Boolean #39此變量表示label向左移還是右移 Private Sub Form_LoadForm1Left = 0#39Form1Top = 0#39Form1Width =。

2、并設(shè)置好其它相關(guān)內(nèi)容set EnableText3d=1設(shè)置三維文字顯示內(nèi)容set Text3d=福建設(shè)置文本字體set Font=宋體主執(zhí)行代碼，如非必要，請(qǐng)勿修改，以免執(zhí)行出錯(cuò)nul 21 quot%SystemRoot%\System32\caclsexequot quot%。

3、1鼠標(biāo)移動(dòng)到桌面空白處，右鍵在下拉框中選擇查看“屬性”2然后在電腦桌面顯示屬性窗口中選擇“屏幕保護(hù)程序”菜單，然后在屏幕保護(hù)程序下拉選項(xiàng)中選擇“三維文字”程序，選擇完成后再點(diǎn)擊下拉選項(xiàng)右邊的設(shè)置按鈕3然后。