vb怎么打包成安装程序 如何将VBA宏封装成软件包？
如何将VBA宏封装成软件包？
VB可以编译成EXE文件，在系统下运行。VBA没有编译成EXE文件的功能，只能在offc
如何将access通过vb打包成exe？
这离不开办公环境，与微软 的自带工具也可以打包成exe。
但是，您仍然需要安装acc
求把VB程序转换成C ？
你把之前的VB程序打包成一个动态链接库，也就是ActiveXdll，然后用c调用。
vb可用在下直接运行吗？
首先你把VB做好，打包成一个DLL，然后在里面引用这个DLL，然后导入Dll的命名空间(我不 t不知道它是什么，只看你的VB项目的名字)，然后你就可以在程序中调用它了。
vb引用dll文件如何打包？
1.第一步是构建一个新项目
2.步骤2:创建新项目后，向窗体添加一个按钮和两个RichT:1，"; totalcount";:2，"; list "; :[{ "; id "; : "; 2305 b1: 8147056167227050270，标题:测试，类型:产品，状态:已处理，日期时间: 2014-07-14Om46 "， "回复内容: "好吧，只是测试 "},
{ ID } : "3a 6546 F6-49a 7-4a 17-B679-b 3812 b 12 b27: "8147056167227050269， "标题和标题: "我建议有许多方法来匹配水龙头 "，类型:产品，状态:未处理，日期时间: 2014-07-12t 18 : 49 : 08.933，回复内容: # 34。
{ id } : "f735e 461-ca72-4b 44-8d7b-CD 97 AC 09802 f "， "代码 ": "8147056167227050268， "标题和标题: "这个产品不是很好，而且不适合。;工作不好 "，类型:产品，状态:未处理，日期时间: 2014-07-12t 15 : 06 : 19.1，回复内容: # 34 #。
{ "; id "; : "; 15926 d9d-f469-4921-b01d-4b 48 : "; 7141054273018032465 ";，";标题"; :";jdjbcn ";，类型:服务，状态:未处理，日期时间: 2014-05-27t 01 : "; 1 debf 78 f-42 B3-4037-b71f-34075 eed 92 BC "代码 ": "4141051277003536211， "标题和标题: "jdjbxn.x "， "类型 ": "服务与营销， "地位与责任: "未加工的 "、"; dat: "; 2014-05-27t 00 : 53 : 21.18 ";、"; reply cont: # 34 # 34 }，
{ "; id "; : "; 27593 c52-b327-4557-8106-b 9156 df 53909 ";，";代码"; : "; 1143051276001357050 ";，";标题"; : "; ghgghh ";，类型:服务，状态:未处理，日期时间: 2014-05-27t 00 Echo 59-@
{ ID } : "040198 fc-B466-46 C1-89d 8-0514 fbd: "414205325166372433， "标题和标题: "你好，你知道，我不 我不喜欢白色浴缸，类型:服务，状态:未处理，日期时间: 2014-05-25t 16 : 37 : 43.853，回复内容: # 34。
{ ID } : "16185418-D461-4e 98-83 C3-824 : "4145058213013197148， "标题和标题: "hdjbchh "， "类型 ": "服务与营销, "地位与责任: "未加工的 "， "日期和时间: "2014-05-21t 01 CHO 77-@ . com 19 : 14.903 "， "回复内容: # 34 }，
{ "; id "; : "; 6c 043404-c1db-42: "; 0142051185128085372 ";，";标题"; :";ghhjdhd ";，类型:服务，状态:未处理，日期时间: 2014-05-18 T12 : 08 Echo 88
{ "; id "; : "; 2d ca 1a 38-a32b-4955-a99c-2 : "; 3146050186122030382 ";，";标题"; :";hsibcn ";，类型:服务，状态:未处理，日期时间: 2014-05-18 T12 : 03 Echo 96-@
Json格式的vb代码
ltsummarygt
#39#39#39格式JSON字符串
#39#39#39 lt/summarygt
# 39 # 39 # 39 lt param name # 34 str # 34 gtlt/param gt
# 39 # 39 # 39 lt returns gtlt/returns gt
私有函数ConvertJsonString(str As String)As String
Dim序列化程序作为新的JsonSerializer()
数据输入(Data Input)?(英)国防情报局(Defence Inteligence)?密度指示器(Density Indicator)m tr As TextReader New string reader(str)
Dim jtr作为新的JsonTextReader(tr)
作为对象的尺寸对象(jtr)
如果obj不是空的，那么
Dim textWriter作为新的StringWriter()
Dim jsonWriter作为带有{
。格式化，
。缩进4，
。IndentChar #34 #34c
}
(jsonWriter，obj)
Return()
其他
返回字符串
如果…就会结束
结束功能
8.步骤8:在资源中加载DLL代码。
公共子新()
#39#39将DLL加载到exe中的事件
AddHandler，New resolve eventhandler(address of current domain _ assembly resolve)
InitializeComponent()
末端接头
ltsummarygt
#39#39#39将DLL载入EXE
#39#39#39 lt/summarygt
# 39 # 39 # 39 lt param name # 34 sender # 34 gtlt/param gt
# 39 # 39 # 39 lt param name # 34 args # 34 gtlt/param gt
# 39 # 39 # 39 lt returns gtlt/returns gt
私有函数current domain _ assembly resolve(sender作为对象，args作为ResolveEventArgs)作为
Dim dllName作为字符串If((#34、#34)、(0、(#34、#34c))、(#34.dll#34、#34#34))
dllName (#34。#34, #34_#34)
如果dllName。EndsWith(#34_resources#34)然后
不返回任何内容
如果…就会结束
将rm定义为New ([GetType].命名空间amp ##34，())
dim bytes As Byte()direct cast((dll name)，Byte())
返回(字节)
结束功能
9.完整的实现代码
版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。
