[VB6 ] dll回傳值抓不到
以下c程式做buffer用
int ReadBuffer(int Num)
{
if ( Num >= 0 && Num < 40 )
return (int)buf[Num];
else
return 0x01;
} // Func : Read Buffer
VB程式宣告為
Private Declare Function ReadBuffer Lib "xxx" (ByVal Num As Long) As Long
Private Sub Timer1_Timer()
Dim a As Long
Dim Num As Long
Dim ReadBuffer(40) As Long
a = ReadBuffer(Num)
Text1.Text = a
End Sub
c程式buffer範圍內會回傳為十進制的值,若不在範圍內會回傳為1
但當我的Timer啟動後text所顯示的一直是0,但無任何的錯誤訊息
請問有可能是甚麼原因導致沒有收到c的回傳值?
或是程式哪裡有問題?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 122.116.241.189
推
11/19 23:46, , 1F
11/19 23:46, 1F
→
11/20 19:33, , 2F
11/20 19:33, 2F
→
11/20 19:35, , 3F
11/20 19:35, 3F
推
11/21 11:59, , 4F
11/21 11:59, 4F
→
11/21 14:27, , 5F
11/21 14:27, 5F
→
11/21 19:48, , 6F
11/21 19:48, 6F
→
11/21 19:48, , 7F
11/21 19:48, 7F
→
11/21 19:49, , 8F
11/21 19:49, 8F
→
11/21 19:50, , 9F
11/21 19:50, 9F
→
11/22 21:12, , 10F
11/22 21:12, 10F
→
11/22 21:13, , 11F
11/22 21:13, 11F
→
11/22 21:14, , 12F
11/22 21:14, 12F