VB下如何调用Delphi写的一个DLL? 请各位大虾帮帮忙。

Question

请各位大虾帮忙，分少点，却已是我全部家当。  
 
在Delphi里說明是这样的：  
 
function  abcd(sStr:string):boolean;export;  
external  'ABCDS.dll';  
 
请问：  
我在VB下如何去调用  ABCDS.dll  里的  "abcd  "

Answer 1

Public Declare Function abcd Lib "ABCDS.dll" Alias "abcd" (ByVal sStr As String) As boolean 
我没有试，你试一试！

Answer 2

Public Declare Function abcd Lib "ABCDS.dll" Alias "abcd" (ByVal sStr As String) As boolean 
我没有试，你试一试！

Answer 3

Public Declare Function abcd Lib "ABCDS.dll" Alias "abcd" (ByVal sStr As String) As boolean 
我没有试，你试一试！

Answer 4

请教各位大虾另一个问题：
  如何读取一段字符串中的某段字符串，并将它提取出来，如：
  “abc123   456: xyz" 
  “abcd123   456: xyz"
这两句字符中组成的一段字符串，我如何去读“abc123","abcs123","456","xyz"?

Answer 5

Public Declare Function abcd Lib "ABCDS.dll" Alias "abcd" (ByVal sStr As String) As boolean 
好像不需要Alias "abcd" 吧？多余的感觉
用Instr函数，
Dim intPos As Integer
    intPos = InStr(1,"abc123   456: xyz","abc123")
从"abc123   456: xyz"字符串的第1位开始比对，当第一次出现"abc123"字符串时，返回其位置值至intPos

Answer 6

Public Declare Function abcd Lib "ABCDS.dll" Alias "abcd" (ByVal sStr As String) As boolean 
好像不需要Alias "abcd" 吧？多余的感觉要，因为调用的时候用了String类型，如果我们调用的API函数要使用字符串（参数中包含String型）的话，Alias关键字是必须的。这是因为在ANSI和Unicode字符集中同一API函数的名称可能是不一样的，为了保证不出现声明错误，我们使用Alias关键字指出API函数的别名，一般来说在WIN9X平台下我们把API函数名后加一个大写A作为别名即可。

Answer 7

各位大虾，我怎样才能让一个DOS的窗口获得键盤的焦点？？