vb.net 怎样调用delphi dll （这个dll C#可以调用的)

vb   .net   可以调用api   dll   没有出错，我调用自己的delphi   写的dll就出现错误，而且我用C#调用是好的，不知道是否因为我的调用方法有问题  
   
  Declare   Auto   Function   PrvBarcode   Lib   "lenx.dll"   (ByVal   bpreview   As   Boolean,   ByVal   strBarcode   As   String,   ByVal   strName   As   String,   ByVal   strDate   As   String,   ByVal   strStandard   As   String,   ByVal   strTwoBarcode   As   String,   ByVal   h   As   System.IntPtr)  
   
  有错吗 问题点数：50、回复次数：11Top

1 楼east_asp（强兵）回复于 2005-04-07 19:01:00 得分 0

请教高手回答，找了很多资料都没有找到，只找到错误的，没有人回答的，msdn的   由调用api   的dll我也看了，还是不知道怎么解决Top

2 楼ylnjust02（亮亮）回复于 2005-04-07 20:08:17 得分 0

可以添加引用啊，  
  项目-〉添加引用-〉浏览  
  找到dll就行了Top

3 楼east_asp（强兵）回复于 2005-04-07 20:45:34 得分 0

不可以添加引用的，我的dll不是标准的Com库，也添加不了的，没有高手吗，难道真的不可以调用Top

4 楼g961681（技术庸人(情商太低)）回复于 2005-04-07 23:35:42 得分 0

路过学习！  
  不过应该是可以的！  
  记得以前在delphi中，刘艺的一本书中，说过的！Top

5 楼fangxinggood（JustACoder）回复于 2005-04-08 01:25:12 得分 0

提示什么错误？  
  这样试试，既然C#没问题，VB.NET就一定能调用。  
  <DLLImport("lenx.dll")>   _  
  Public   Shared   Function   PrvBarcode   (ByVal   bpreview   As   Boolean,   _  
                                                                        ByVal   strBarcode   As   String,   _  
                                                                        ByVal   strName   As   String,   _  
                                                                        ByVal   strDate   As   String,   _  
                                                                        ByVal   strStandard   As   String,   _  
                                                                        ByVal   strTwoBarcode   As   String,   _  
                                                                        ByVal   h   As   System.IntPtr)   As   String  
  End   Function  
  猜想你有返回值String.  
  Top

6 楼fangxinggood（JustACoder）回复于 2005-04-08 01:25:47 得分 0

最好能把你C#的调用语句贴出来看看Top

7 楼east_asp（强兵）回复于 2005-04-08 08:56:13 得分 0

[DllImport("lenx.dll")]  
  public   static   extern     void   PrvBarcode(bool   bpreview,   string   strBarcode,string   strName,   string   strDate,string   strStandard,string   strTwoBarcode,System.IntPtr   h);  
   
  调用  
  PrvBarcode(true,"12324324342","自动识别技术","lksjdflskjdf","lskdfj","识别技术有限公司,www.lenx.cn,020-85546118",hdc);  
  Top

8 楼east_asp（强兵）回复于 2005-04-08 08:58:11 得分 0

没有写返回值Top

9 楼landlordh（work wonders）回复于 2005-04-08 09:16:41 得分 20

 
  Public   Shared   Sub   PrvBarcode(ByVal   bpreview   As   Boolean,   ByVal   strBarcode   As   String,   ByVal   strName   As   String,   ByVal   strDate   As   String,   ByVal   strStandard   As   String,   ByVal   strTwoBarcode   As   String,   ByVal   h   As   System.IntPtr)    
  End   SubTop

10 楼fangxinggood（JustACoder）回复于 2005-04-08 09:18:54 得分 30

没有返回值，改为sub就可以了。Top

11 楼east_asp（强兵）回复于 2005-04-08 09:47:36 得分 0

非常非常的感谢，   landlordh，fangxinggood(JustACoder)   祝你们今天有大运Top

相关问题

• c#
• vb.net
• dll
• vb
• 调用
• prvbarcode
• byval
• bpreview
• strbarcode
• strstandard

• 帖主：east_asp
• landlordh
• fangxinggood

• CSDN .NET频道
• .NET类图书
• C#类图书
• .NET类源码下载