Dzwebs.Net

撰写电脑技术杂文十余年

excel使用API函数的例子

Admin | 2013-1-7 9:38:34 | 被阅次数 | 16436

温馨提示!

如果未能解决您的问题,请点击搜索;登陆可复制文章,点击登陆

  要想在Excel里面使用API函数,当然,只能在VBA中使用。

  本文,给你介绍一个简单的例子,为你介绍在Excel的VBA里面如何使用API函数

  一、何为API函数

  API,它的英文名称是:Application Programming Interface,中文含义是:应用程序编程接口。

  它是一套用来控制Windows的各个部件(从桌面的外观到为一个新进程分配的内存)的外观和行为的一套预先定义的Windows函数.用户的每个动作都会引发一个或几个函数的运行以告诉Windows发生了什么,这在某种程度上很象Windows的天然代码.其他的语言只是提供一种能自动而且更容易的访问API的方法。

  同样,当你点击窗体上的一个按钮时,Windows会发送一个消息给窗体(这对于你来说是隐藏的),VB获取这个调用并经过分析后生成一个特定事件(Button_Click)。API函数包含在Windows系统目录下的动态连接库文件中(如User32.dll,GDI32.dll,Shell32.dll...)。

  二、EXCEL VBA如何使用API函数

  首先你新建一个工作薄,然后,对该工作薄进行保存。

  接着,在Sheet1表里面,右键点击“Sheet1”标签,在弹出的菜单中选择“查看代码”,这样,就会弹出VBA代码编写窗口了。

  在代码窗口的“通用事件”中,填写如下代码:

  Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

  如上代码,指的是对API函数进行声明,否则将无法调用API函数。并且,我们要调用的API函数为:PlaySound

  接下来,我们就可以直接调用PlaySound函数了。调用的代码也简单,代码如下:

  Call PlaySound(ThisWorkbook.Path & "\dzwebs.wav", 0&, &H8 Or &H1)

  就这么简单,你只要让如上的一行代码能运行,即可看到效果。注意哦,这行代码可以写在按钮对象的事件里面,也可以放在某个宏里面,当作其代码。

  三、关于API函数的知识扩展

  A、声明API函数有两种方法

  如果我们只在某个窗体中使用API函数,我们可以在窗体代码的General部分声明它:

  声明的语法是:
  Private Declare Function ...
  Private Declare Sub.....

  这里必须采用Private声明,因为这个API函数只能被一个窗体内的程序所调用。

  如果我们的程序有多个窗体构成,而且我们需要在多个窗体中使用同一个API函数,就需要在模块中声明了。然后采用如下语法声明:

  Public Declare Function....
  Public Declare Sub....

  Public声明的含义是把API函数作为一个公共函数或过程,在一个工程中的任何位置(包括所有的窗体和模块)都能直接调用它。声明完毕我们就能在程序中使用此API函数了。

  B、使用API函数的几种方法

  忽略函数返回值的调用:
  SetWindowPos Form1.hWnd, -2 ,0 ,0 ,0, 0, 3
  注意此时函数的参数是不加括号的。

  Call方法调用:
  Call SetWindowPos(Form1.hWnd, -2, 0, 0, 0, 3)
  注意这里需要加上括号,但我们不取回函数的返回值。

  取得函数返回值的调用:
  MyLng = SetWindowPos(Form1.hWnd, -2, 0, 0, 0, 3)
  此时需要加上括号,而且我们必须事先定义一个变量(变量的类型与函数返回值类型相同)来存储API函数的返回值。

  C、补充说明

  声明中的Lib和Alias的说明

  一般情况下WIN32API函数总是包含在WINDOWS系统自带的或是其它公司提供的动态连接库DLL中,而Declare语句中的Lib关键字就用来指定DLL(动态连接库)文件的路径,这样VB才能找到这个DLL文件,然后才能使用其中的API函数。如果我们只是列出DLL文件名而不指出其完整的路径的话,VB会自动到.EXE文件所在目录、当前工作目录、WINDOWS\SYSTEM目录、WINDOWS目录下搜寻这个DLL文件。所以如果所要使用DLL文件不在上述几个目录下的话,我们应该指明其完整路径。

  Alias用于指定API函数的别名,如果我们调用的API函数要使用字符串(参数中包含String型)的话,Alias关键字是必须的。这是因为在ANSI和Unicode字符集中同一API函数的名称可能是不一样的,为了保证不出现声明错误,我们使用Alias关键字指出API函数的别名,一般来说在WIN9X平台下我们把API函数名后加一个大写A作为别名即可。

  常见的API参数类型的说明

  API函数的参数中最常见的是长整Long型数据类型,例如API中的句柄、一些特定的常量、函数的返回值都是此类型 的值;另外几种常见的参数类型有:整型Integer、Byte型、String型等。

  声明中的ByVal的作用

  这跟VB的参数传递方式有关,在默认情况下VB是通过地址传递方式传递函数的参数、而有些API函数要求必须采用传值方式来传递函数参数(这两种参数传递方式是不同的,前者传递的是一个指针,而后者要求是参数真实的值)。这样就会发生错误,解决的办法是在API函数参数声明的前面加上ByVal关键字,这样VB就采用传值方式传递参数了。


该杂文来自: Excel杂文

上一篇:vba FreeFile的使用

下一篇:年利率NOMINAL函数语法及使用方法

网站备案号:

网站备案号:滇ICP备11001339号-7

版权属性:

Copyright 2007-2021-forever Inc. all Rights Reserved.

联系方式:

Email:dzwebs@126.com QQ:83539231 访问统计