如何在VisualBasic中使用导入API

在Visual Basic中使用导入API会发现很难找到正确的dll。我知道C++里有dll，但是有没有可以从VB应用中调用的dll？

答案是肯定的:

有两种方法可以完成这项工作。一种方法是在VB的DECLARE部分列出你希望调用的C API，然后使用标准。

的调用序列从VB中调用它，如下面的代码示例所示:

SQLCA_STRUCT类型

sqlcaid作为字符串* 8

sqlcabc As Long

sqlcode As Long

sqlerrml为整数

sqlerrmc作为字符串* 70

sqlerrp作为字符串* 8

sqlerrd(6)一样长

sqlwarn作为String * 11

sqlstate作为字符串* 5

结束类型

公共声明函数sqlepstart Lib“db 2 app”别名“sqlepstart_api”

(ByVal junk & # 38，ByRef sqlca As SQLCA_STRUCT)作为整数

'

DB2_start = sqlepstart(0，sqlca)'启动DB2调用

另一种方法是生成一个文件，然后发出一个命令在后台执行该功能(当然，这取决于您试图做什么):

fileno = FreeFile

打开db2file作为#fileno输出

sqlstmt = "" + _

" db2start"+ vbNewLine + _

“退出；”

将#fileno，sqlstmt '写入命令写入文件

关闭#fileno '关闭它并执行命令

db 2 cmd = " db 2 cmd/I/c DB2-tvf "+db 2 file '生成命令

progID = Shell(db2cmd，vbMinimizedNoFocus) ' Shell out来运行它

最后，下一版本的DB2将允许您运行特殊的API命令，就像普通的SQL表函数一样。这将返回当前在DB2中发现的许多管理API的结果。因此，您不需要进行API调用，您可以只使用SQL调用从DB2获取信件。