Skip to content
  • Categories
  • Recent
  • Tags
  • Popular
  • World
  • Users
  • Groups
Skins
  • Light
  • Cerulean
  • Cosmo
  • Flatly
  • Journal
  • Litera
  • Lumen
  • Lux
  • Materia
  • Minty
  • Morph
  • Pulse
  • Sandstone
  • Simplex
  • Sketchy
  • Spacelab
  • United
  • Yeti
  • Zephyr
  • Dark
  • Cyborg
  • Darkly
  • Quartz
  • Slate
  • Solar
  • Superhero
  • Vapor

  • Default (No Skin)
  • No Skin
Collapse
Code Project
T

TheAphextwin

@TheAphextwin
About
Posts
1
Topics
0
Shares
0
Groups
0
Followers
0
Following
0

Posts

Recent Best Controversial

  • Run a Visual C++ program from VB Script and get a return value ??
    T TheAphextwin

    I have a VB project that loads a C++ DLL. Declare the following module level API functions in your VB project. ' -- Windows API Public Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long Public Declare Function FreeLibrary Lib "kernel32" (ByVal hLibModule As Long) As Long ' -- Public function in C++ DLL Public Declare Function Test Lib "mycdll.dll" Alias "test_vb" () As Long To use the C++ function you can use something like the following. Note: strDLL holds the fullpath to the C++ DLL ' -- Load the dll lngRet = LoadLibrary(strDLL) ' -- Check for success If lngRet <> 0 Then ' -- Run the script Msgbox Test Else MsgBox "Could not load dll '" & strDLL & "'" & DEF_SPACE, vbCritical, DEF_APP_TITLE GoTo PROC_EXIT End If PROC_EXIT: ' -- Clean up If lngRet <> 0 Then FreeLibrary lngRet

    Visual Basic c++ testing beta-testing tools
  • Login

  • Don't have an account? Register

  • Login or register to search.
  • First post
    Last post
0
  • Categories
  • Recent
  • Tags
  • Popular
  • World
  • Users
  • Groups