Sourcode :
'


Code:
Option Explicit

Type CustomerInfo
    company As String
    contact As String
    RegionCode As Integer
    Sales As Long
End Type

Type CountryInfo
    CountryName As String
    CountryCode As Integer
End Type

Type Out_CustomerInfo
    company As String
    contact As String
    RegionCode As Integer
...