我还是有点儿不懂!
请看这样行吗??
例如:
Function NullToZero(strString : Pchar) : string;
begin
ReSult := strString;
if trim(strString) = '' then
Result := '0';
end;
在dll里声明了一个函数,但是在vb里如何声明并且调用呢??
我试了一下这样:
Public Declare Function NullToZero Lib "DllFunc32" (ByRef str As String) As String然后 Text2.Text = NullToZero(Text1.Text)
调用,但是结果是第一次不出错,第二次就出错了!我还是不明白,请指教,谢谢!
请看这样行吗??
例如:
Function NullToZero(strString : Pchar) : string;
begin
ReSult := strString;
if trim(strString) = '' then
Result := '0';
end;
在dll里声明了一个函数,但是在vb里如何声明并且调用呢??
我试了一下这样:
Public Declare Function NullToZero Lib "DllFunc32" (ByRef str As String) As String然后 Text2.Text = NullToZero(Text1.Text)
调用,但是结果是第一次不出错,第二次就出错了!我还是不明白,请指教,谢谢!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货