Structure S End Structure Module M Sub Main() dim x as S End Sub End Module