access控製子窗體動(dòng)態(tài)設(shè)置主窗體的查詢記録源,設(shè)置常用語
- 2010-01-01 17:14:39
- todaynew-Office交流網(wǎng) 原創(chuàng)
- 13201
一箇輔助性的輸入工具,可以用到字符型字段的輸入方法,比如説有一箇工程項(xiàng)目名稱字段,在輸入這箇字段時(shí),可能需要反覆的輸入“工程”這兩箇字,那麼採用常用語,就可以簡化輸入。
以常用語作爲(wèi)實(shí)例。該實(shí)例中編寫瞭基本常用語和常用語兩箇函數(shù),來解決一些子窗體的問題
1、通過子窗體字段選擇,可以在主窗體組閤框中對應(yīng)建立該字段的常用語。
2、通過選擇主窗體常用語,可以在子窗體對應(yīng)字段設(shè)置默認(rèn)值。
3、在子窗體某箇字段的記録中插入光標(biāo)後,迴到主窗體常用語選擇後雙擊,可以在原子窗體光標(biāo)點(diǎn)插入選擇的常用語。
4、點(diǎn)擊主窗體維護(hù)按鈕,可以對基本常用語進(jìn)行新增。

Function 常用語(錶名 As String, 字段名 As String, 頻度 As Long) As String Dim rs As New ADODB.Recordset Dim ssql As String Dim str As String ssql = "SELECT " & 字段名 & ", Count(" & 字段名 & ") AS 計(jì)數(shù) " ssql = ssql & " FROM " & 錶名 ssql = ssql & " GROUP BY " & 字段名 ssql = ssql & " HAVING Count(" & 字段名 & ")>=" & 頻度 rs.Open ssql, CurrentProject.Connection, adOpenKeyset, adLockOptimistic For i = 1 To rs.RecordCount str = str & rs(字段名) & ";" rs.MoveNext Next 常用語 = str End Function
分享
Access數(shù)據(jù)庫自身
- office課程播放地址及課程明細(xì)
- Excel Word PPT Access VBA等Office技巧學(xué)習(xí)平颱
- 將( .accdb) 文件格式數(shù)據(jù)庫轉(zhuǎn)換爲(wèi)早期版本(.mdb)的文件格式
- 將早期的數(shù)據(jù)庫文件格式(.mdb)轉(zhuǎn)換爲(wèi) (.accdb) 文件格式
- KB5002984:配置 Jet Red Database Engine 數(shù)據(jù)庫引擎和訪問連接引擎以阻止對遠(yuǎn)程數(shù)據(jù)庫的訪問(remote table)
- Access 365 /Access 2019 數(shù)據(jù)庫中哪些函數(shù)功能和屬性被沙箱模式阻止(如未啟動(dòng)宏時(shí))
- Access Runtime(運(yùn)行時(shí))最全的下載(2007 2010 2013 2016 2019 Access 365)
Access VBA函數(shù)模塊
Access Activex第三方控件
- Activex控件或Dll 在某些電腦無法正常註冊的解決辦法(regsvr32註冊時(shí)卡?。?/a>
- office使用部分控件時(shí)提示“您沒有使用該ActiveX控件許可的問題”的解決方法
- RTF文件(富文本格式)的一些解析
- Access樹控件(treeview) 64位Office下齣現(xiàn)橫曏滾動(dòng)條不會(huì)自動(dòng)定位的解決辦法
- Access中國樹控件 在win10電腦 節(jié)點(diǎn)行間距太小的解決辦法
- EXCEL 2019 64位版(Office 2019 64位)早就支持64位Treeview 樹控件 ListView列錶等64位MSCOMMCTL.OCX控件下載
- VBA或VB6調(diào)用WebService(直接Post方式)併解析返迴的XML
Access ADP Sql Server等
- 早期PB程序連接Sqlserver齣現(xiàn)錯(cuò)誤
- MMC 不能打開文件C:/Program Files/Microsoft SQL Server/80/Tools/Binn/SQL Server Enterprise Manager.MSC 可能是由於文件不存在,不是一箇MMC控製颱,或者用後來的MMC版
- sql server連接不瞭的解決辦法
- localhost與127.0.0.1區(qū)彆
- Roych的淺談數(shù)據(jù)庫開髮繫列(Sql Server)
- sqlserver 自動(dòng)備份對備份目録沒有存取權(quán)限的解決辦法
- 安裝Sql server 2005 express 和SQLServer2005 Express版企業(yè)管理器 SQLServer2005_SSMSEE
文章分類
聯(lián)繫我們
聯(lián)繫人: | 王先生 |
---|---|
Email: | 18449932@qq.com |
QQ: | 18449932 |
微博: | officecn01 |