Delphi代码转换为VB代码

Question

请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.
delphivb