Access:API使用集锦

只是如此66888

只是如此66888

2016-02-19 18:21

下面是个超简单的Access:API使用集锦教程,图老师小编精心挑选推荐,大家行行好,多给几个赞吧,小编吐血跪求~

记载Windows使用的时间

(本文来源于图老师网站,更多请访问https://m.tulaoshi.com/bianchengyuyan/)

  有时候你需要记下每次Windows开启和关闭的时间,下面这个小程序就可以完成这个功能,你可以把它放在Windows开始菜单的“启动”文件夹里面,这样当你进入Windows时,这个小程序就会自动启动(不可见),并在你指定的文件中写下当时的时间,在你推出Windows系统时,小程序会关闭并记下离开的时间,并关闭记录文件。

Private Sub Form_Load()

Left = -10000

Top = -10000

Open "c:appslog.txt" For Append As #1

Print #1, "On: " & CStr(Now)

Close #1

End Sub

Private Sub Form_Unload(Cancel As Integer)

Open "c:appslog.txt" For Append As #1

Print #1, "Off:" & CStr(Now)

Close #1

End

End Sub

怎样关闭一个正在运行的程序

  你可以使用API函数FindWindow和PostMessage去寻找指定的窗口,并关闭它。下面的例子教给你怎样找到并关掉一个Caption为“Caluclator”的程序。

Dim winHwnd As Long

Dim RetVal As Long

winHwnd = FindWindow(vbNullString, "Calculator")

Debug.Print winHwnd

If winHwnd 0 Then

RetVal = PostMessage(winHwnd, WM_CLOSE, 0&, 0&)

If RetVal = 0 Then

MsgBox "置入消息错误!"

End If

Else

(本文来源于图老师网站,更多请访问https://m.tulaoshi.com/bianchengyuyan/)

MsgBox "Calculator没有打开!"

End If

展开更多 50%)
分享

猜你喜欢

Access:API使用集锦

编程语言 网络编程
Access:API使用集锦

ACCESS集锦

电脑网络
ACCESS集锦

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

FlashGet使用技巧集锦

电脑入门
FlashGet使用技巧集锦

Dreamweaver使用技巧集锦

Web开发
Dreamweaver使用技巧集锦

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

使用 Google Ajax Search API

Web开发
使用 Google Ajax Search API

Access使用查询

编程语言 网络编程
Access使用查询

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

access数据库备份问题讨论

access数据库备份问题讨论

word2007中繁简字体快速转换设置

word2007中繁简字体快速转换设置
下拉加载更多内容 ↓