I need help converting VB6 code to .Net

DefInt A-Z
Option Explicit
 
Global PPath$                                   'program path
 
Global CancelFlag As Boolean
Global Const CCSetup_Reclen = 99
 
'Credit Card company setup
Type CCcompanyType
    Company As String * 2
    Path As String * 30
    TID As String * 32
End Type
Global CCcompany As CCcompanyType
 
'Debit Card file structure
Type DCtype
    Company As Integer
    TID As String * 32
    Phone1 As String * 20
    Phone2 As String * 20
    'fdf 3/1/2001 added..begin
    WorkingKey As String * 16
    Processor As String * 4
    Default As String * 1
    MasterKey As String * 1
    KeyManagement As String * 1
    SerialNumber As String * 16
    Blank As String * 15
    'fdf 3/1/2001 added..end
'    Blank As String * 54
End Type
Global DC As DCtype
 
'Check Services company setup
Type CHKcompanyType
    Company As String * 2
    SiteID As String * 32
    Service As String * 2
    Blank As String * 28
End Type
Global CHKcompany As CHKcompanyType
 
'fdf 2/19/2001 added..begin
'Debit Card file structure
Type GCtype
    'Company As Integer
    Company As String * 1
    TID As String * 32
    Phone1 As String * 20
    Phone2 As String * 20
    Blank As String * 54
End Type
Global GC As GCtype
'fdf 2/19/2001 added..end
 
'general program constants
Global CR$
Global LF$
 
Global Action As String

Select allOpen in new window