如何让VB的程序在别人电脑上运行

如何让VB的程序在别人电脑上运行,第1张

打包,用VB自带的打包软件。

或者使用

VBPowerWrap41

[VB做

绿色软件

]

他能将VB程序变成绿色版本。自动将所需要的控件压缩集成。

就可以拿到其他电脑上运行了。

任何一款软件的运行都是要有其开发所用的运行库,这个是因为你写的程序调用了某些DLL文件或者使用了其他的OCX控件造成的!所以说你发布程序的时候必须要带上这些文件!当然了对方机器上还需要有VB运行

解决方法就是把VB运行库和控件文件直接加到你的安装程序里面。别人安装你的程序后运行库和控件就拷到他的系统目录下了

添加到注册表RUN

Option Explicit

'---------------处理注册表的函数-----------------------

Private Declare Function RegCreateKey& Lib "advapi32dll" Alias "RegCreateKeyA" (ByVal hKey&, ByVal lpszSubKey$, lphKey&)

Private Declare Function RegSetValue Lib "advapi32dll" Alias "RegSetValueA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal dwType As Long, ByVal lpData As String, ByVal cbData As Long) As Long

Const HKEY_LOCAL_MACHINE = &H80000002

Const REG_SZ = 1

'HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run

Private Sub Command1_Click()

'声明变量

Dim sKeyName As String, sKeyValue As String, sKeyValueIcon As String

Dim Ret As Integer, lphKey As Long

sKeyName = "Software\Microsoft\Windows\CurrentVersion\Run"

sKeyValue = AppPath & IIf(Len(AppPath) > 3, "\" & AppEXEName & "exe", AppEXEName)

Ret = RegCreateKey&(HKEY_LOCAL_MACHINE, sKeyName, lphKey)

Ret = RegSetValue&(lphKey&, "", REG_SZ, sKeyValue, 0&)

End Sub

以上就是关于如何让VB的程序在别人电脑上运行全部的内容,包括:如何让VB的程序在别人电脑上运行、vb编写的程序如何能在其他电脑上运行、如何让vb程序在电脑启动时随windows自动运行等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

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

原文地址:https://www.54852.com/zz/10165929.html

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

发表评论

登录后才能评论

评论列表(0条)

    保存