日志
- 分享 全能打手，首推ShellExecute
- ShellExecute能打开东西很多，打开外部程序、网页、文件夹、EMAIL、我的文档、我的电脑、回收站等等。一切与系统关联的东西都可以用它来打开，谓之“全能打手”也不过份。 Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFil ...
- 分享 优化 DoCmd.RunCommand acCmdAppMinimize
- 把启动窗体设为弹出模式并在窗体加载事件中加入DoCmd.RunCommand acCmdAppMinimize 就能对数据库进行隐藏。大家可能也碰到过这样的情况，同样的代码同样是弹出模式，主窗体为何有时是缩少到最小化，有时却能正常显示呢？先不说原因，下面的代码也许对你有所帮助 Private Declare Function SetF ...
- 分享 屏幕的暂停与更新
- LockWindowUpdate 和GetDesktopWindow 一般配对使用，作用跟我们熟识的 DoCmd.Echo False和 DoCmd.Echo True有点相似，功能更为强大，在调用前，必须作如下的声明： '锁定指定窗口，禁止它更新。同时只能有一个窗口处于锁定状态 Private Declare Function LockWindow ...
- 分享 ACCESS的Instance
- Instance代表正在运行的应用实例，也是常用的句柄之一。在VB App.Instance可取得当前运行程序的句柄，在ACCESS要现实同样的功能，应该怎样书写呢。也许你会认为currentproject.Instance吧(VB当前路径: app.path, access currentproject.path,VB App.Instance 转换成ACCESS自然想到的是curre ...
- 分享 缇与像素的互换
- API都是以像素为单位，VBA中的默认度量单位为缇；1440 缇等于 1 英寸，2者的单位不同必须进行转换。 '获取指定窗口的设备场景 Private Declare Function apiGetDC Lib "user32" _ Alias "GetDC" _ (ByVal hwnd As Long) _ As Long '释放由调用GetDC或GetWindowDC ...
- 分享 ACCESS控件的句柄
- 在VB中获得一个对象的句柄是十分简单的，只需简单地使用类似的如下的语句： Object.hWnd 窗体Form1的句柄:Form1.hwnd, 按扭command1的句柄:command1.hwnd。 &nbs ...
- 分享 API 学习随笔
- 很多次都想把自已的心得写下来，每次拿起笔总感觉千金重，不知从何写起。作为一个ACCESS爱好者，当积累了一定的知识和实践经验后，越发感觉自已所学的知识更加的微不足道。ACCESS简单、易学易用这是它的最大特点，用来开发企业自身的管理软件是个不错的选择。ACCESS也不是万能，很多事情做 ...
- 分享 代码导出导入自定义菜单示例
- 编写程序时，很多时候需要代码来控制数据库的导进导出, TransferDatabase 并不支持自定义菜单的导进导出． 在网上有说可以通过MsysCmdbars来现实．在2003版本中并没发现MsysCmdbars这个表．显然这种方法是行不通的 下面例子通过菜单复制而达到自定义菜单的导进导出功能，希望对你们有所帮助 ...
- 分享 快速统计文件中指定字符串的数量
- Function CountMatches(ByVal strFic As String, ByVal strSearch As String) As Long ' 需引用 Microsoft VBScript Regular Expressions 5.5 library ' 统计文本文件指定的字符串的个数 ' 用法: ?countmatches("c:\SoftwareList.txt","ERP") Dim reg As VBScript_RegExp_55.RegExp &nb ...
- 分享 API 改变TreeView背景
- 支持多颜色混合填充背景 API改变TreeView背景.rar (2007-12-28 20:06:58, Size: 32.4 KB, Downloads: 0)
