Imports System.ComponentModel
Public Class PhoneSSN

  Inherits System.Windows.Forms.UserControl

  ' Kod generowany przez Windows Form Designer 


  '============ Składniki danych ============

  ' Różne dostępne formanty 
  Enum Selection
    Phone = 0
    SSN
  End Enum

  ' Składowe prywatne 
  Private mBoxType As Selection   ' Czy chcą telefon czy ubezpieczenie?
  Private mAreaCode As String     ' Kod obszaru 
  Private mExchange As String     ' Nr centrali
  Private mNumber As String       ' Reszta numeru
  Private mComplete As String     ' Cały łańcuch

  '============ Procedury właściwości ============

  '           InputType() ==> Typ wprowadzanych danych

  <Description("Określa, Czy wprowadzasz numery telefonu czy numer" & _
      ubezpieczenia"), Category("Behavior")> _
      Property InputType() As Selection
    Get
      Return mBoxType
    End Get
    Set(ByVal Value As Selection)
      mBoxType = Value
    End Set
  End Property
