VC中怎么使用VB的函数

VC中怎么使用VB的函数
能否提供一点思路
谢谢

如果有人想知道的话
我可以把它贴出来

不是说了吗
在MSDN上

faint，以后大家都看MSDN好了。

主要用的是COM技术
如果在MSDN上找不到的话，我告诉你

不是说了吗
在MSDN上

既然已经找到了答案，能不能告诉大家，让我们一起来分享！

不行！
不过我已在MSDN上找到了解决办法！
谢谢各位回答。

已经知道输出函数了，自己写个h文件，再包括vb的lib文件不行吗？

VC好比心旷神怡的原始森林，有清晰的本质面目，
VB则象一座盖好的房子，问你它用什么材料建成的，难！

例子如下:
typedef VOID (*VTPROC)(LPTSTR);
void MyProc()
{
HINSTANCE hinstLib;
VTPROC ProcAdd;
BOOL fFreeResult, fRunTimeLinkSuccess = FALSE;
 
    // Get a handle to the DLL module.
    hinstLib = LoadLibrary(\"VideoTrimmerProj\");
    if (hinstLib != NULL)
    {
        ProcAdd = (VTPROC)GetProcAddress(hinstLib, \"VBFunc\");
        if (fRunTimeLinkSuccess = (ProcAdd != NULL))
            (ProcAdd) (\"message via DLL function\\n\");
        fFreeResult = FreeLibrary(hinstLib);
    }
    if (! fRunTimeLinkSuccess)
        printf(\"message via alternative method\\n\");
}
ProcAdd的值总是NULL

我LoadLibarary后
再用GetProcAddress
得不到函数的地址

VB生成的dll只有dll文件、lib文件
在VC中怎么调用啊？

可以快速生成一个VB的COM组件，导出接口，然后可以在VC中调用。

应该可以吧。 :D

如果很难用VC编写，就只有用VB编了
不知VB的Active dll能否象dll在VC中使用？

看declare function/sub这样的语句。
没有for VC的，我也没有办法了。 :(

问个很菜的问题
怎么知道VB使用了哪些dll，他的定义方式不同于VC

我也想用VC写，可下面这段代码...
Dim objSmartRenderEngine As New SmartRenderEngine
Public Sub AddFileWriterAndMux(objFilterGraphManager As FilgraphManager, bstrFileName As String)
      Dim objFilterInfo As IFilterInfo
      Dim objRegisteredFilters As Object
      Dim objAVIMuxFilterInfo As IFilterInfo
      Dim objRegFilterInfo As IRegFilterInfo
      Dim objFileSinkFilterVB As IFileSinkFilterForVB
      On Local Error GoTo ErrLine
            
      \'derive a collection of registered filters from the filtergraph manager
      Set objRegisteredFilters = objFilterGraphManager.RegFilterCollection
            
      \'enumerate through the registered filters
      For Each objRegFilterInfo In objRegisteredFilters
          If Trim(LCase(objRegFilterInfo.Name)) = \"file writer\" Then
              objRegFilterInfo.Filter objFilterInfo
          ElseIf Trim(LCase(objRegFilterInfo.Name)) = \"avi mux\" Then
              objRegFilterInfo.Filter objAVIMuxFilterInfo
          End If
      Next
            
      \'derive the file sink filter tailored for vb
          Set objFileSinkFilterVB = objFilterInfo.Filter
       \'assign the filename to the sink filter
          Call objFileSinkFilterVB.SetFileName(bstrFileName, Nothing)
...
            
我有几个问题：
1.用VC重写是否可以直接将VB代码替换成VC(如赋值、函数调用等)
2.如有只在VB中定义的Object怎么办
  如IFileSinkFilterForVB
3.Set objRegisteredFilters = objFilterGraphManager.RegFilterCollection
  For Each objRegFilterInfo In objRegisteredFilters
  VC该怎么写
谢谢做答
 

一般来说，VC代码更容易转换成VB代码，只要处理好数据类型，
近似一一对应；
但是，由于VB语言对基本的API函数进行封装，所以在逆向转换时
难度较前者大，你得了解它有没有从一大堆DLL中引用外部函数，
如果是这样，转换VC时也必须调用相应的DLL才行。

arthurtu兄，帮帮忙吧！

这个例子叫TrimmerVB
独独他找不到VC的例子
真TMD的微软