Access或VB VBA 穫?cè)〔t窗體或控件的句柄 Hwnd, 如果用API 設(shè)置焦點(diǎn)到這箇控件或窗體上
- 2017-09-07 21:45:00
- zstmtony 原創(chuàng)
- 6990
Access或VB VBA 穫?cè)〔t窗體或控件的句柄 Hwnd, 如果用API 設(shè)置焦點(diǎn)到這箇控件或窗體上
可使用以下的代碼，要準(zhǔn)確定位焦點(diǎn)
1. 使用VB API SendMessage來(lái)實(shí)現(xiàn)
簡(jiǎn)易使用SendMessage,比SetFocus更爲(wèi)底層,調(diào)用速度快 Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Private Const WM_SETFOCUS = &H7 SendMessage childhwnd, WM_SETFOCUS, 0, ByVal 0&
2. 如果 用API Setfocus也是可以的。
VB SetFocus方法的介紹
將焦點(diǎn)移至指定的控件或窗體。
語(yǔ)法
object.SetFocus
object 所在處代錶對(duì)象錶達(dá)式，其值是“應(yīng)用於”列錶中的一箇對(duì)象。
説明
對(duì)象必鬚是 Form 對(duì)象、MDIForm 對(duì)象或者能夠接收焦點(diǎn)的控件。調(diào)用 SetFocus 方法以後，任何的用戶輸入將指曏指定的窗體或控件。
焦點(diǎn)隻能移到可視的窗體或控件。因爲(wèi)在窗體的 Load 事件完成前窗體或窗體上的控件是不可視的，所以如果不是在 Form_Load 事件過(guò)程完成之前首先使用 Show 方法顯示窗體的話，是不能使用 SetFocus 方法將焦點(diǎn)移至正在自己的 Load 事件中加載的窗體的。
也不能把焦點(diǎn)移到 Enabled 屬性被設(shè)置爲(wèi) False 的窗體或控件。如果已在設(shè)計(jì)時(shí)將 Enabled 屬性設(shè)置爲(wèi) False，必鬚在使用 SetFocus 方法使其接收焦點(diǎn)前將 Enabled 屬性設(shè)置爲(wèi) True。
可使用SetFocus的部分控件
1.MDI窗體。
2.窗體
3.ADODATA 控件
4.Animation 控件
5.CheckBox 控件
6.ComboBox 控件
7.CommandButton 控件
8.所有數(shù)據(jù)（Data）控件
9.DateTimePicker 控件
10.DirListBox 控件
11.DriveListBox 控件
12.FileListBox 控件
13.HScrollBar 、VScrollbar 控件
14.FlatScrollbar 控件
15.ListBox 和 ListView 控件
16.TextBox 控件
17.Imagecombo 控件
18.Masked Edit 控件
19.OLE 容器控件
20.MSFlexGrid 和 MSHFlexGrid 控件（彆把兩箇控件混一起瞭）
21.OptionButton 控件
22.PictureBox 控件
23. 屬性頁(yè)對(duì)象（Property Page ）
24.RichTextBox 控件
25.Silder 控件
26. 用戶自定義控件對(duì)象 （UserControl ）
27.ActiveX 文檔 （UserDocument）
28.TabStrip 控件
29.TreeView 控件
30.updown 控件
31.Window 對(duì)象
分享
Access數(shù)據(jù)庫(kù)自身
- office課程播放地址及課程明細(xì)
- Excel Word PPT Access VBA等Office技巧學(xué)習(xí)平颱
- 將( .accdb) 文件格式數(shù)據(jù)庫(kù)轉(zhuǎn)換爲(wèi)早期版本(.mdb)的文件格式
- 將早期的數(shù)據(jù)庫(kù)文件格式（.mdb）轉(zhuǎn)換爲(wèi) （.accdb） 文件格式
- KB5002984：配置 Jet Red Database Engine 數(shù)據(jù)庫(kù)引擎和訪問(wèn)連接引擎以阻止對(duì)遠(yuǎn)程數(shù)據(jù)庫(kù)的訪問(wèn)（remote table)
- Access 365 /Access 2019 數(shù)據(jù)庫(kù)中哪些函數(shù)功能和屬性被沙箱模式阻止（如未啟動(dòng)宏時(shí)）
- Access Runtime(運(yùn)行時(shí))最全的下載(2007 2010 2013 2016 2019 Access 365)
Access VBA函數(shù)模塊
- access vba代碼太長(zhǎng)，換行，分行的寫(xiě)法
- VB6 VBA Access真正可用併且完美支持中英文的 URLEncode 與 URLDecode 函數(shù)源碼
- 自定義VB中的urlencode函數(shù)，將URL中特殊部分進(jìn)行編碼
- Access 函數(shù)簡(jiǎn)化串接sql字符串，減少符號(hào)導(dǎo)緻的書(shū)寫(xiě)錯(cuò)誤
- vba完全關(guān)閉IE瀏覽器及調(diào)用IE瀏覽器的簡(jiǎn)單應(yīng)用
- 利用FollowHyperlink方法打開(kāi)超鏈接提示“無(wú)法下載您要求的信息”的解決方案
- 在access中用代碼打開(kāi)文本框中超鏈接地址
Access Activex第三方控件
- Activex控件或Dll 在某些電腦無(wú)法正常註冊(cè)的解決辦法(regsvr32註冊(cè)時(shí)卡?。?/a>
- office使用部分控件時(shí)提示“您沒(méi)有使用該ActiveX控件許可的問(wèn)題”的解決方法
- RTF文件（富文本格式）的一些解析
- Access樹(shù)控件（treeview) 64位Office下齣現(xiàn)橫曏滾動(dòng)條不會(huì)自動(dòng)定位的解決辦法
- Access中國(guó)樹(shù)控件 在win10電腦 節(jié)點(diǎn)行間距太小的解決辦法
- EXCEL 2019 64位版（Office 2019 64位）早就支持64位Treeview 樹(shù)控件 ListView列錶等64位MSCOMMCTL.OCX控件下載
- VBA或VB6調(diào)用WebService（直接Post方式）併解析返迴的XML
Access ADP Sql Server等
- 早期PB程序連接Sqlserver齣現(xiàn)錯(cuò)誤
- MMC 不能打開(kāi)文件C:/Program Files/Microsoft SQL Server/80/Tools/Binn/SQL Server Enterprise Manager.MSC 可能是由於文件不存在，不是一箇MMC控製颱，或者用後來(lái)的MMC版
- sql server連接不瞭的解決辦法
- localhost與127.0.0.1區(qū)彆
- Roych的淺談數(shù)據(jù)庫(kù)開(kāi)髮繫列（Sql Server)
- sqlserver 自動(dòng)備份對(duì)備份目録沒(méi)有存取權(quán)限的解決辦法
- 安裝Sql server 2005 express 和SQLServer2005 Express版企業(yè)管理器 SQLServer2005_SSMSEE
Access 行業(yè)應(yīng)用開(kāi)髮
文章分類
聯(lián)繫我們
| 聯(lián)繫人： | 王先生 |
|---|---|
| Email： | 18449932@qq.com |
| QQ： | 18449932 |
| 微博： | officecn01 |
