沒什麼需要特別說明說的,有疑問就看msdn吧,表單上兩個按鈕,一個treeview:Option ExplicitPrivate Declare Function SetWindowLong Lib "user32" _ Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, _ ByVal dwNewLong As Long) As LongPrivate Declare Function GetWindowLong
Private Declare Function CallWindowProcA Lib "user32" ( _ ByVal addr As Long, _ ByVal p1 As Long, _ ByVal p2 As Long, _ ByVal p3 As Long, _ ByVal p4 As Long) As LongPrivate Declare Sub RtlMoveMemory Lib "kernel32" ( _ pDst As Any, _ pSrc As
Option Explicit'需要引用 Microsoft CDO for Windows 2000 Library和 Microsoft ActiveX Data Objects 2.5 LibraryPrivate Sub Command1_Click()Const cdoSendUsingMethod = _ "http://schemas.microsoft.com/cdo/configuration/sendusing"Const cdoSendUsingPort =
只去掉表徵圖是很困難的(用自繪標題列可以解決),今天我們討論的是一種變通的方法,即建立一個空表徵圖代替現有的表徵圖,程式如下:Option ExplicitPrivate Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongPrivate Const
其實沒什麼說的,只是最近一段時間問的人比較多,所以寫上幾句簡單的說,有兩個需要注意的地方,一是要用postmessage發送訊息,二是這兩個訊息lparam參數比較複雜,發送訊息的時候要構造好lparam參數,下面給出範例程式碼:Option ExplicitPrivate Declare Function MapVirtualKey Lib "user32" Alias "MapVirtualKeyA" (ByVal wCode As Long, ByVal wMapType As Long)
其實沒什麼說的,無非就是先找到“網路連接”這個虛擬資料夾,然後找到要控制的本地串連對應的folderitem,然後枚舉verb,找到需要的verb後,調用verb的DoIt方法,在winxp sp2 ,vb6 sp6下測試通過,代碼如下:Option Explicit'首先引用Microsoft Shell Controls And AutomationPrivate Function ExcNetLinkMenu(ByVal AdapterName As String,
發布ASP.NET或者ASP應用時經常會碰到因為不恰當的NTFS授權引出的問題,這類問題通常調試起來很頭痛,要求調試者具有豐富經驗。(比如需要瞭解ASP.NET的進程模型,Shadow Copy可能涉及的目錄,以及當ASP只報告一個“resource in use”的錯誤時,它可能指的是asp在啟動的時候裝載一個殺毒軟體目錄下dll檔案失敗,等等) 我剛剛發現,藉助http://www.sysinternals.com/上的一個小工具
Frame控制項是vb中使用得比較頻繁的控制項之一,它在本質上是個button,因此可以用setwindowlong為其附加或者移除BS_LEFT、BS_RIGHT、BS_CENTER之類的風格,以改變其caption的對齊,程式如下:'表單上有一個Frame控制項Option ExplicitPrivate Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long,
首先,需要指出的是toolbar的ButtonMenu不是標準的menu,所以用TrackPopupMenu之類的api函數無法達到我們的目的,事實上當使用者點擊dropdown button時,toolbar會發送TBN_DROPDOWN這條通知訊息,所以我們只要用代碼類比發送這條通知訊息即可。代碼如下:Option ExplicitPrivate Type TBBUTTON iBitmap As Long idCommand As Long fsState As
最近用C#寫一個簡單的瀏覽器,遇到一個小小的問題,即:在通過WebBrowser.DocumentText擷取的頁面內容是亂碼?百度了N久,也沒看到一個較好的解決辦法。通過反覆的實驗,並總結網上各位同仁的思路,終於找到瞭解決的辦法。下面提供給大家,以供參考。System.IO.StreamReader getReader = new System.IO.StreamReader(this.webBrowser.DocumentStream,
我們知道ComboCox的Height屬性是唯讀,那麼怎麼改變ComboBox控制項自身的高度呢,答案很簡單,就是發送CB_SETITEMHEIGHT訊息:Option ExplicitPrivate Const CB_SETITEMHEIGHT& = &H153Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As