vb在模块中声明函数

一、在VB中声明API函数有两种方法：如果我们只在某个窗体中使用API函数，我们可以在窗体代码的General部分声明它：

站在用户的角度思考问题，与客户深入沟通，找到城固网站设计与城固网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：网站设计制作、成都网站设计、企业官网、英文网站、手机端网站、网站推广、域名注册、雅安服务器托管、企业邮箱。业务覆盖城固地区。

声明的语法是：

Private Declare Function ...

Private Declare Sub.....

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

如果我们的程序有多个窗体构成，而且我们需要在多个窗体中使用同一个API函数，就需要在模块中声明了。

先添加一个模块，

然后采用如下语法声明：

Public Declare Function....

Public Declare Sub....

Public声明的含义是把API函数作为一个公共函数或过程，在一个工程中的任何位置都能直接调用它。 声明完毕我们就能在程序中使用此API函数了。

二、可采用以下几种方式使用API函数，以SetWindowPos函数为例：

忽略函数返回值的调用：

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函数的返回值。

三、几个问题的说明：

声明中的Lib 和 Alias 是怎么回事

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

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

常见的API参数类型的说明

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

声明中的ByVal是作什么用的

这跟VB的参数传递方式有关，在默认情况下VB是通过地址传递方式传递函数的参数、而有些API函数要求必须采用传值方式来传递函数参数。这样就会发生错误，解决的办法是在API函数参数声明的前面加上ByVal关键字，这样VB就采用传值方式传递参数了。

怎样得到完整的API函数声明

VB自带了API文本查看器API TEXT VIEWER，我们可以在其中找到API函数的完整声明，然后把它粘贴到程序中即可。

原来上午的成功了！但取不到秒数位。

在vb点虐 中如何定义staticextern函数

在vb点虐 中定义staticextern函数：用static声明的局部变量。static是C++中常用的修饰符，它被用来控制变量的存贮方式和可见性。extern，C是使C++能够调用C写作的库文件的一个手段。

VB怎么添加函数声明

第一步：打开vb在vb顶部的菜单上点击： “外接程序”——“外接程序管理器...”——打开“外接程序管理器”对话框，

第二步：在“可用外接程序”里选中“vb 6 API Viewer ”；

第三步：再在“加载行为”中把“在启动中加载”和“加载/卸载”两个选项前打上钩。点击“确定”关闭对话框。

第四步：再次打开“外接程序”里边就出现了“API 浏览器”

第五步：打开“API浏览器”后，单击菜单上的“文件”，选择“加载文本文件...” ,打开“选择一个API文本文件”对话框

第六步：选择“WIN32API.TXT”

VB.NET中如何声明RegisterActiveObject函数

提示的意思是说你声明的这个函数在DLL库中的访问级别是Friend级，也就是说此函数只准许DLL内部的对象进行访问。而不直接外面声明调用！

网站栏目：vb点虐 内置函数声明 vbnet instr
网站地址：http://myzitong.com/article/ddijggj.html