求助，一段DELPHI代码转成VB.NET

本人初学VB，有不懂德尔菲，有如下一段代码需要转换层vb.NETtype
  ZipOption_t = record
    FileType:pchar;         //文件格式
    pwd:pchar;              //访问口令
    Version : pchar;        //版本
    Memos : PChar;          //备注
    Reserved : PChar;       //保留的文本区
    src:PChar;              //源文件
    dst:pchar;              //目标文件
    IncludeSubDir:Boolean;  //目录压缩时是否压缩子目录
  end;  ZipOption_p = ^ZipOption_t;
  UnZipOption_t = ZipOption_t;
  UnZipOption_p = ZipOption_p;  StepFunc_t = record
    BeginStep : procedure  (Msg:pchar; Count:integer);  stdcall;
    Step : procedure  (msg:pchar;Position:integer);stdcall;
    EndStep: procedure();
   end;
   StepFunc_p = ^StepFunc_t;function ZipFile(ZipOption: ZipOption_p; StepFunc: StepFunc_p): Boolean;external'dszip.dll';function UnzipFile(UnZipOption: UnZipOption_p; StepFunc: StepFunc_p): Boolean; external'dszip.dll';