請Delphi高手指點,如何將下面這段代碼轉換為VB代碼。
const
_KEYA = $00;
_KEYB = $04;
type
TMydata = array [1..15,0..3] of string;
TParaBuf = record
ComNo: integer;
Baud: integer;
Sys_Sec: array[1..3] of integer;
User_Sec: array[1..5] of integer;
AuthorNo: array[1..6] of PChar;
UserSec: array[1..6] of integer;
end;
TPParaBuf = ^TParaBuf;
function ReadAuthor(buf: TPParaBuf):integer ;export; stdcall;external 'pcsDll.dll';
function Authorize(buf: TPParaBuf;wType: integer = 0): integer; export; stdcall;external 'pcsDll.dll';
implementation
end.
uj5u.com熱心網友回復:
發到VB論壇應該不難轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/149108.html
標籤:語言基礎/算法/系統設計
上一篇:急,DCOM連接問題
