爱问知识人 爱问教育 医院库

如何把VB程序中需要的控件合并到程序中

首页

如何把VB程序中需要的控件合并到程序中

就是比如我加载一个winsock控件到一个VB的程序中,但是生成的程序在没装VB的电脑上无法使用(缺少winsock控件的DLL),要如何解决?(不要只是简单的复制所需的DLL和生成的程序一起,我就是想把控件合并到EXE文件中,这样就只要一个生成的EXE文件就行了),谢谢大家!

提交回答

全部答案

    2018-06-02 04:30:18
  •   有办法: 

    把文件放到资源文件里,然后,在程序启动时,从资源文件里提取文件,把文件放到system32里,或放到与程序同一文件夹内,这样的话,winsock不用注册也能用,如果系统已经存在,只是用已经存在的文件,而不影响使用。
      
    但是要求,你只能在程序启动并完成上述操作之后方可使用winsock,
    比如下例操作会出错:你的启动窗体为frmload,但frmload有winsock控件。

    从资源文件里提取文件的方法如下:这是我写的代码,用法应该一看就知道
    Public Function SaveFileFromResource(vntResourceID As Variant, sType As String, sFileName As String) As Boolean

    Dim bytImage() As Byte
    Dim iFileNum As Integer
    On Error GoTo SaveFileFromRes_Err
    SaveFileFromResource = True

    bytImage = LoadResData(vntResourceID, sType)

    iFileNum = FreeFile

    Open sFileName For Binary As iFileNum
    Put #iFileNum, , bytImage
    Close iFileNum
    Exit Function
    SaveFileFromRes_Err:
    'SaveFileFromResource = False: Err。
      Clear
    End Function。

    是***

    2018-06-02 04:30:18

类似问题

换一换
  • 程序设计 相关知识

  • 电脑网络技术
  • 电脑网络

相关推荐

正在加载...

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选):