其他

'下面的代碼向你示範在VB中如何建立一個捷徑。Private Declare Function fCreateShellLink()Function fCreateShellLink Lib "STKIT432.DLL" (ByVal lpstrFolderName As String, ByVal lpstrLinkName As String, ByVal lpstrLinkPath As String, ByVal lpstrLinkArgs As String) As Long Sub 

以下是我的具體思路：　 　　寫兩個程式，一個是主程式；一個是升級程式（升級程式放在伺服器上）；　 　　說明：所有升級任務都由升級程式完成。　 　　1.啟動升級程式，升級程式串連到網站，下載新的主程式（當然還包括支援的庫檔案等）到臨時檔案夾；　 　　2.升級程式檢測舊的主程式是否活動，若活動則關閉舊的主程式（同時記下主程式的狀態）；　 　　3.刪除舊的主程式，拷貝臨時檔案夾中的檔案到相應的位置，同時註冊相應的檔案；　　 　　4.檢查主程式的狀態，若狀態為活動的，則啟動新的主程式；　

 如何避免程式重複執行？（偵測是否存在前一副本，若有，則結束目前新啟動的程式）。使用者在啟動程式後，有時會將程式縮小在工作列上，之後要用時，又會重新啟動一次程式，資料庫程式有時會因此造成資料錯亂！若您不希望使用者重複啟動程式，您可以使用 APP

    在一些系統，為了特定目的，經常要求程式隱藏起來運行，例如DCS（集散控制系統）中的後台監控系統、木馬控製程序、源碼防拷貝等，以減少被發現、截殺和反組譯碼的風險。這種功能模組要求程式在運行期間不僅不會在案頭出現，也不允許被操作者從工作管理員列表中發現。 程式隱形的原理 對於一個隱形程式而言，最基本的要求是： 1. 不在案頭出現介面； 2. 不在工作列出現表徵圖； 3. 程式名從工作管理員名單中消失。     對於上述第一點，可以將Form的Visible屬性設為False。    

 ''請在聲明區中加入以下聲明 Private Declare Function SetWindowPos()Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long Const SW

曾看到一個問題：如何使我的視窗總在最前？使用api函數 SetWindowPos 可以很容易的作到。顧名思義， SetWindowPos 就是完成設定視窗位置和狀態（pos=position）的功能。原始碼如下：Option ExplicitPrivate Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y

動態產生多個相同的控制項，實際上是這麼做的表單上放一個COMMAND按鈕，假定命名為cmd，將index設定成0,visible=False控制的核心的代碼是： Private Sub Form_Load()For i = 1 To 5  '這裡是要產生控制項的數量Load cmd(i)    '動態產生cmd(i).Caption = "botton " & i    ' 產生控制項的Captioncmd(i).Top = cmd(i).Height * (i / 5 + (i - 1

以預設程式開啟文檔　 要以與檔案尾碼名關聯的程式開啟文檔，在Windows 9X和Windows NT下可以用ShellExcute函數方便地實現。這則小技巧展示了會有多方便―你只需要一個聲明和一行代碼！　　開始一個新項目。在Form上放一個Command

cdecl   由調用者清除堆棧  stdcall   由被調的函數清除堆棧  fastcall   是把函數參數列表的前三個參數放入寄存器eax,edx,ecx,其他參數壓棧。_stdcall 與 _cdecl 的區別幾乎我們寫的每一個WINDOWS API函數都是__stdcall類型的，首先，需要瞭解兩者之間的區別：

將VB應用程式縮成系統狀態列表徵圖二法 第一種方法：VB光碟片的tools/unsupport/systray目錄下有一個例子,將此目錄複寫到硬碟,編譯產生一個OCX控制項，在自己的程式中使用此控制項,可以實現將程式表徵圖放於右下角系統表徵圖區，這方法比調用API要簡單得多第二種方法：梁潔儀 ---- 在很多應用程式中，其操作視窗縮小後將變成一表徵圖放置在系統狀態列中。 ---- 為什麼有的程式可以縮小成表徵圖呢？ ----

Option ExplicitPublic Declare Function ChangeDisplaySettings()Function ChangeDisplaySettings Lib "user32.dll" Alias "ChangeDisplaySettingsA" (ByRef lpDevMode As DEVMODE, ByVal dwFlags As Long) As LongPublic Declare Function EnumDisplaySettings()Funct

'【VB源碼推薦：一個操作Ini檔案的類】'--------cIniFile.cls 代碼----------------'這裡定義了一個cIniFile類Option Explicit'// Private member that holds a reference to'// the path of our ini filePrivate strInI As String'// Win API DeclaresPrivate Declare Function WritePrivateProf

　　1、如果一行程式太長，能不能換行？　　VB的程式碼是允許換行書寫的，只要在每次換行的最後一個字元加上換行字元“_”就可以了。例如： 　　Sub PicMove() 　　 Frm.Picture2.Left = Frm.Picture1.Left + _ ’加上分行符號 　　 Frm.Picture1.Width 　　 End Sub　　2、 如何在設計的時候清空存在的圖片？ 　　用滑鼠點中該圖片，在屬性視窗中選中Picture屬性，按Del鍵便可清空圖片。　　3、 Visual Basic

SetWindowsHookEx Function 此函數添加了一個程式定義的鉤子過程到鉤子鏈中，用這個鉤子過程來監視系統中的特定類型的事件，這些事件與指定的線程或所有的線程相關 HHOOK SetWindowsHookEx( int idHook, HOOKPROC lpfn, HINSTANCE hMod, DWORD dwThreadId ); 參數詳解: idHook:指定鉤子過程的類型，取值如下:

'在頂層表單實現動態顯示視窗列表'    我從一開始編程，就徹底拋棄了_screen,而改用頂層表單。我個人感覺頂層表單做出的系統顯示專業些，也許是因為我對_screen瞭解不夠深入吧。選用頂層表單作為系統主表單，就意味著很多東西必須自己去實現。例如如何?動態顯示視窗列表，以為是我的個人經驗，希望能拋磚引玉!'*************************'基於base.vcx中的_form類'*************************'''''''*!* LoadValues事件代

1.添加一個 函數：BOOL APIENTRY DllMain( HANDLE hModule,                        DWORD  ul_reason_for_call,                        LPVOID lpReserved ){    switch (ul_reason_for_call){case DLL_PROCESS_ATTACH:case DLL_THREAD_ATTACH:case DLL_THREAD_DETACH:case

Visual Basic 6.0.with.SP6

在聲明區中聲明如下 (在 .bas 檔中用 Public, 在 Form 中用 Private) Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory

打造完美可隨意安裝的WinXP鏡像2005-05-19 10:18 作者： 沈軍 出處： 電腦報 責任編輯：原野 　　以往，我們用Ghost製作的Win98/Me作業系統鏡像檔案，可以在其他電腦上通行無阻地複製，從而大大節省在多台電腦中重複安裝作業系統的時間，這對辦公室和網吧裝機特別有用。但WinXP和Windows Server

什麼是XML 　　 擴充標記語言XML是一種簡單的資料存放區語言，使用一系列簡單的標記描述資料，而這些標記可以用方便的方式建立，雖然XML佔用的空間比位元據要佔用更多的空間，但XML極其簡單易於掌握和使用。 　　 XML與Access,Oracle和SQL