兩個方法
公司主營業務:成都網站建設、成都網站設計、移動網站開發等業務。幫助企業客戶真正實現互聯網宣傳,提高企業的競爭能力。創新互聯是一支青春激揚、勤奮敬業、活力青春激揚、勤奮敬業、活力澎湃、和諧高效的團隊。公司秉承以“開放、自由、嚴謹、自律”為核心的企業文化,感謝他們對我們的高要求,感謝他們從不同領域給我們帶來的挑戰,讓我們激情的團隊有機會用頭腦與智慧不斷的給客戶帶來驚喜。創新互聯推出康縣免費做網站回饋大家。
1.
要接收的窗口先使用FindWindow這個api獲得句柄
調用SetForegroundWindow使其獲得焦點并選中
調用點虐 方法:SendKeys.Send方法發送
2.使用API的SendInput
一個時刻只有一個窗體能獲得焦點。關鍵是窗體收到
WM_KILLFOCUS
消息時的重繪。如果你只是想讓窗體看起來并沒有什么不同,就這樣吧。我用
VB6,所以寫的都是
API,VB.NET
的庫不是很熟,所以……將就一下吧。
調用
SetWindowLong,使窗體的消息處理鏈接到新的窗口函數
NewWndProc,然后在
NewWndProc
里檢測到
WM_KILLFOCUS
時就將其移出消息隊列即可。完畢之后調用原來的窗口函數。
處理數據行(DataRow)
Windows窗體中的數據綁定列表框和組合框很節省時間 典型的代碼如下(假定已經建立了SqlDataAdapter或者其它部件獲取數據)
Dim ds As New DataSet() SqlDataAdapter Fill(ds Customers ) ListBox DataSource = ds Tables( Customers ) ListBox DisplayMember = CompanyName ListBox ValueMember = CustomerID
在這種情況下 代碼使用Northwind數據庫的顧客記錄工作 DisplayMember屬性設置為你希望用戶在列表框中看到的記錄字段 它是customers表的CompanyName 通常ValueMember屬性設置為數據表中的一個鍵字段 對于customer來說是CustomerID 一旦用戶選擇了列表框中的一行 很容易使用列表框的SelectedValue屬性獲得鍵字段
MsgBox(ListBox SelectedValue)
但是有可能需要一個與被選擇項相關的整個數據行對象的引用 例如 如果被選擇的行需要被刪除 就不知道鍵了 你需要一個數據行的引用以使用Delete方法
典型的Visual Basic開發者通常這樣想 我已經得到了該行的鍵了 我將編寫一些邏輯來查找使用該鍵的行 這樣可以實現 但是有更好的實現方法 可以使用一行代碼獲取與列表框中選項關聯的數據行
Dim dr As DataRow = CType(ListBox SelectedItem DataRowView) Row
通常該邏輯不會憑直覺出現 即使對經驗豐富的開發者 為了解釋這是怎樣實現的 我把上面的一行拆成幾行 下面的代碼與上面代碼的功能相同
Dim drv As DataRowView drv = CType(ListBox SelectedItem DataRowView) Dim dr As DataRow dr = drv Row
DataRowView類是數據行的包裝 它被多個Windows窗體控件使用 它使得顯示與控件中的數據行相關的數據更加容易 當列表框被數據綁定到數據表時(假定列表框中的有些行當前被選定了) 列表框的SelectedItem屬性保存了一個DataRowView對象
這意味著我們能把列表框的SelectedItem屬性轉換到DataRowView對象 這就是上面代碼中的第二行實現的 接著DataRowView暴露一個Row屬性 它指向被包裝的數據行 上面的代碼聲明了一個數據行并設置了Row屬性
轉換對象的類型以訪問它的接口的技術在Visual Basic 中不是經常使用 但是在Visual Basic NET中這是經常的 有了上面的例子后 大多數有經驗的開發者迅速跟上了這種技術
數據行的引用(dr)可用于用任何方式維護行 訪問數據行中的任何特定字段是可行的 行中的數據可以被改變 能使數據行的Delete方法把該行標識為刪除 或者從數據表的行集合中刪除該行 下面的代碼標識刪除了一行
dr Delete()
lishixinzhi/Article/program/net/201311/12974
網站名稱:vb點虐
消息處理 vbnet implements
網頁網址:http://vcdvsql.cn/article20/ddeidjo.html
成都網站建設公司_創新互聯,為您提供網站建設、、電子商務、虛擬主機、云服務器、網頁設計公司
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯