怎样用VB调用外部程序急!

怎样用VB调用外部程序急!,第1张

使用Shell函数来调用外部的应用程序。

Shell 函数

执行一个可执行文件,返回一个 Variant

(Double),如果成功的话,代表这个程序的任务 ID,若不成功,则会返回 0。

Shell 函数示例

本示例使用 Shell 函数来完成一个用户指定的应用程序。

' 将第二个参数值设成 1,可让该程序以正常大小的窗口完成,并且拥有焦点。

Dim RetVal

RetVal = Shell("C:\WINDOWS\system32\CALCEXE", 1)   ' 完成Calculator。

解决方案1:

则该变量只是在其所属工程中是公用的。

可以使用 Public 语句声明一个过程,Public NumberOfEmployees As Integer

也可以使用 Public 语句来声明变量的对象类型:在模块级别中使用,Private NumberOfEmployees As Integer

也可以使用 Private 语句来声明变量的对象类型,

1根据MSDN的定义、对象和过程在所有应用程序的所有没有使用 Option Private Module 的模块的任何过程中都是可用的、Public是在公共模块中定义变量。

如果使用Public在窗体模块或者类模块中定义的变量、对象和过程时使用的。

Private 语句声明的变量(包括数组变量)。

2。例如。例如;若该模块使用了 Option Private Module,可以在过程内用 ReDim 语句来定义该数组的维数和元素。例如、对象和过程可以在整个程序的各个模块中使用,定义的变量。

Public 语句声明的变量(包括数组变量)。

可以使用 Private 语句声明一个过程、对象和过程只能在本模块内使用,用于声明私有变量及分配存储空间、Public 语句

Public 语句。

二,然后可以在过程内用 ReDim 语句来定义该数组的维数和元素。

MSDN是这样定义的,通过窗体名称或者类名称的引用也可以在其他模块中使用、 Private在模块级别中定义变量。

使用 Public 语句可以声明变量的数据类型、对象和过程,定义的变量。

Private 变量只能在包含其声明的模块中使用:

一,Public X As New Worksheet

可以用带空圆括号的 Public 语句来声明动态数组。

可以使用 Private 语句声明变量的数据类型,只在声明所在的模块中有效:在模块级别中使用、对象和过程。在声明了动态数组之后,用于声明公用变量和分配存储空间,包括窗体模块和标准模块,Private X As New Worksheet

可以用带空圆括号的 Private 语句来声明动态数组、Private 语句

解决方案2

lpData As AnyPrivate是在窗体模块中定义变量;

Public是在公共模块中定义变量dll"RegSetValueExA"。

譬如; (ByVal hKey As Long、数据类型或者子过程时使用的, ByVal dwType As Long, ByVal lpValueName As String; Alias ", you must pass it By Value。

Public:

Private,定义的东西只能在本窗体内使用, ByVal Reserved As Long、数据类型或者子过程时使用的,定义的东西可以在整个程序的各个窗体中使用:

(窗体中的公共部分写入)

Private Declare Function RegSetValueEx Lib ", ByVal cbData As Long) As Long 'advapi32; Note that if you declare the lpData parameter as String

dim data3() As Double '定义数组

Dim iData3 As Long

Do Until rsEOF

If rsFields("钢种") = Form1Combo1Text Then

data3(iData3) = AlConsume() + 5

iData3 = iData3 + 1

Exit Do

End If

rsMoveNext

Loop

你数组是动态数组 你连redim 都没有 怎么可能使用数组元素

以上就是关于怎样用VB调用外部程序急!全部的内容,包括:怎样用VB调用外部程序急!、VB中如何在窗体中调用模块的public函数、vb 调用模块中的函数等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/9475163.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-28
下一篇 2023-04-28

发表评论

登录后才能评论

评论列表(0条)

保存