VERSION 2.00
Begin Form SXS2 
   BorderStyle     =   3  'Fixed Double
   Caption         =   "SoundX Sample 2"
   ClientHeight    =   3375
   ClientLeft      =   1110
   ClientTop       =   2445
   ClientWidth     =   6015
   Height          =   3780
   Left            =   1050
   LinkTopic       =   "Form1"
   ScaleHeight     =   3375
   ScaleWidth      =   6015
   Top             =   2100
   Width           =   6135
   Begin ListBox List3 
      Height          =   1785
      Left            =   4080
      TabIndex        =   6
      Top             =   1320
      Width           =   1695
   End
   Begin ListBox List2 
      Height          =   1785
      Left            =   2160
      TabIndex        =   5
      Top             =   1320
      Width           =   1695
   End
   Begin ListBox List1 
      Height          =   1785
      Left            =   240
      TabIndex        =   4
      Top             =   1320
      Width           =   1695
   End
   Begin ComboBox Combo1 
      Height          =   300
      Left            =   240
      TabIndex        =   0
      Top             =   240
      Width           =   2055
   End
   Begin SoundX SoundX1 
      Left            =   5280
      Top             =   120
   End
   Begin Label Label3 
      Alignment       =   2  'Center
      Caption         =   "Metaphone"
      Height          =   255
      Left            =   4080
      TabIndex        =   9
      Top             =   780
      Width           =   1695
   End
   Begin Label Label2 
      Alignment       =   2  'Center
      Caption         =   "ExtSoundex"
      Height          =   255
      Left            =   2160
      TabIndex        =   8
      Top             =   780
      Width           =   1695
   End
   Begin Label Label1 
      Alignment       =   2  'Center
      Caption         =   "Soundex"
      Height          =   255
      Left            =   240
      TabIndex        =   7
      Top             =   780
      Width           =   1695
   End
   Begin Label Metaphone 
      Alignment       =   2  'Center
      BorderStyle     =   1  'Fixed Single
      Height          =   255
      Left            =   4080
      TabIndex        =   3
      Top             =   1080
      Width           =   1695
   End
   Begin Label ExtSoundex 
      Alignment       =   2  'Center
      BorderStyle     =   1  'Fixed Single
      Height          =   255
      Left            =   2160
      TabIndex        =   2
      Top             =   1080
      Width           =   1695
   End
   Begin Label Soundex 
      Alignment       =   2  'Center
      BorderStyle     =   1  'Fixed Single
      Height          =   255
      Left            =   240
      TabIndex        =   1
      Top             =   1080
      Width           =   1695
   End
End
Option Explicit

Sub Combo1_Change ()
    Dim I As Integer


    SoundX1.Word = Combo1.Text

    Soundex = SoundX1.Soundex
    ExtSoundex = SoundX1.ExtSoundex
    Metaphone = SoundX1.Metaphone

    List1.Clear
    List2.Clear
    List3.Clear

    DoEvents
    Screen.MousePointer = 11

    For I = 0 To Combo1.ListCount - 1
        SoundX1.Word = Combo1.List(I)

        If SoundX1.Soundex = Soundex Then List1.AddItem Combo1.List(I)
        If SoundX1.ExtSoundex = ExtSoundex Then List2.AddItem Combo1.List(I)
        If SoundX1.Metaphone = Metaphone Then List3.AddItem Combo1.List(I)
    Next I

    Screen.MousePointer = 0
End Sub

Sub Combo1_Click ()
    Combo1_Change
End Sub

Sub Form_Load ()
    Combo1.AddItem UCase$("ABRAHAMSON")
    Combo1.AddItem UCase$("ABREVAYA")
    Combo1.AddItem UCase$("ACHENBACH")
    Combo1.AddItem UCase$("achenback")
    Combo1.AddItem UCase$("ACRES")
    Combo1.AddItem UCase$("ADAMS")
    Combo1.AddItem UCase$("ADKINSON")
    Combo1.AddItem UCase$("AGARWALLA")
    Combo1.AddItem UCase$("AGUILAR")
    Combo1.AddItem UCase$("AIMAR")
    Combo1.AddItem UCase$("AKHTAR")
    Combo1.AddItem UCase$("ALBRECHT")
    Combo1.AddItem UCase$("ALBRIGHT")
    Combo1.AddItem UCase$("ALCORN")
    Combo1.AddItem UCase$("ALLEN")
    Combo1.AddItem UCase$("ALSOP")
    Combo1.AddItem UCase$("ALSTON")
    Combo1.AddItem UCase$("ALTENDERFER")
    Combo1.AddItem UCase$("ALTON")
    Combo1.AddItem UCase$("ALVES")
    Combo1.AddItem UCase$("AMERICA")
    Combo1.AddItem UCase$("ANDERSON")
    Combo1.AddItem UCase$("ANDREWS")
    Combo1.AddItem UCase$("ANTILL")
    Combo1.AddItem UCase$("antley")
    Combo1.AddItem UCase$("ANTOSHAK")
    Combo1.AddItem UCase$("AQUINO")
    Combo1.AddItem UCase$("ARENA")
    Combo1.AddItem UCase$("ARMSTRONG")
    Combo1.AddItem UCase$("ARNOLD")
    Combo1.AddItem UCase$("ARSLANGIRAY")
    Combo1.AddItem UCase$("ASHENDORF")
    Combo1.AddItem UCase$("ASSOCIATES")
    Combo1.AddItem UCase$("ASTBURY")
    Combo1.AddItem UCase$("ATTAYA")
    Combo1.AddItem UCase$("AUSTIN")
    Combo1.AddItem UCase$("AXSON")
    Combo1.AddItem UCase$("BABCOCK")
    Combo1.AddItem UCase$("BACHE")
    Combo1.AddItem UCase$("BACHMANN")
    Combo1.AddItem UCase$("BACKSTROM")
    Combo1.AddItem UCase$("BADEAUX")
    Combo1.AddItem UCase$("BAILES")
    Combo1.AddItem UCase$("BAILEY")
    Combo1.AddItem UCase$("BAIRSTOW")
    Combo1.AddItem UCase$("BAKER")
    Combo1.AddItem UCase$("BALDRIDGE")
    Combo1.AddItem UCase$("BALOCCA")
    Combo1.AddItem UCase$("BALOG")
    Combo1.AddItem UCase$("Balshone")
    Combo1.AddItem UCase$("BARB")
    Combo1.AddItem UCase$("BARBARIA")
    Combo1.AddItem UCase$("BARCELLOS")
    Combo1.AddItem UCase$("BARD")
    Combo1.AddItem UCase$("BARESEL")
    Combo1.AddItem UCase$("BARKDULL")
    Combo1.AddItem UCase$("BARKER")
    Combo1.AddItem UCase$("Barlow")
    Combo1.AddItem UCase$("BARNES")
    Combo1.AddItem UCase$("BARRIGA")
    Combo1.AddItem UCase$("BARRY")
    Combo1.AddItem UCase$("BARTEE")
    Combo1.AddItem UCase$("BARTLEY")
    Combo1.AddItem UCase$("Barton")
    Combo1.AddItem UCase$("BARTORILLO")
    Combo1.AddItem UCase$("BASS")
    Combo1.AddItem UCase$("BAUM")
    Combo1.AddItem UCase$("BAXTER")
    Combo1.AddItem UCase$("BAYLESS")
    Combo1.AddItem UCase$("BAYNE")
    Combo1.AddItem UCase$("BAZAN")
    Combo1.AddItem UCase$("BEACHAM")
    Combo1.AddItem UCase$("BEALE")
    Combo1.AddItem UCase$("BECKER")
    Combo1.AddItem UCase$("BEEBE")
    Combo1.AddItem UCase$("beegan")
    Combo1.AddItem UCase$("BEEL")
    Combo1.AddItem UCase$("BEHNKE")
    Combo1.AddItem UCase$("BELLAART")
    Combo1.AddItem UCase$("BENDER")
    Combo1.AddItem UCase$("BENGE")
    Combo1.AddItem UCase$("BENHERSCHEL")
    Combo1.AddItem UCase$("BENNETT")
    Combo1.AddItem UCase$("BENSEN")
    Combo1.AddItem UCase$("BERARDELLI")
    Combo1.AddItem UCase$("BERCINI")
    Combo1.AddItem UCase$("BERG")
    Combo1.AddItem UCase$("BERGER")
    Combo1.AddItem UCase$("BERGONZI")
    Combo1.AddItem UCase$("BERNAUER")
    Combo1.AddItem UCase$("BERNDT")
    Combo1.AddItem UCase$("berning")
    Combo1.AddItem UCase$("BERNSTEIN")
    Combo1.AddItem UCase$("BERRY")
    Combo1.AddItem UCase$("BERTSCH")
    Combo1.AddItem UCase$("BETANCOURT")
    Combo1.AddItem UCase$("BEVILACQUA")
    Combo1.AddItem UCase$("BEZIRTZOGLOU")
    Combo1.AddItem UCase$("BIGGS")
    Combo1.AddItem UCase$("BIGLER")
    Combo1.AddItem UCase$("Biondo")
    Combo1.AddItem UCase$("BISCH")
    Combo1.AddItem UCase$("BISESI")
    Combo1.AddItem UCase$("BJERRE")
    Combo1.AddItem UCase$("BLABER")
    Combo1.AddItem UCase$("BLACKMAN")
    Combo1.AddItem UCase$("BLACKSTOCK")
    Combo1.AddItem UCase$("BLAIR")
    Combo1.AddItem UCase$("BLAKE")
    Combo1.AddItem UCase$("BLAKELEY")
    Combo1.AddItem UCase$("BLANDAMER")
    Combo1.AddItem UCase$("BLANTON")
    Combo1.AddItem UCase$("BLAU")
    Combo1.AddItem UCase$("BLENHEIM")
    Combo1.AddItem UCase$("BLEVINS")
    Combo1.AddItem UCase$("BLISS")
    Combo1.AddItem UCase$("BLOOM")
    Combo1.AddItem UCase$("BLOW")
    Combo1.AddItem UCase$("BLUMENTHAL")
    Combo1.AddItem UCase$("Boardwine")
    Combo1.AddItem UCase$("BOATWRIGHT")
    Combo1.AddItem UCase$("BOCTOR")
    Combo1.AddItem UCase$("BODLEY")
    Combo1.AddItem UCase$("BOGER")
    Combo1.AddItem UCase$("BOGGESS")
    Combo1.AddItem UCase$("BOHN")
    Combo1.AddItem UCase$("BOLING")
    Combo1.AddItem UCase$("BOLITHO")
    Combo1.AddItem UCase$("BOLOGNA")
    Combo1.AddItem UCase$("BOLTON")
    Combo1.AddItem UCase$("BONN")
    Combo1.AddItem UCase$("BOOGAART")
    Combo1.AddItem UCase$("BOOKHAMER")
    Combo1.AddItem UCase$("BOOTH")
    Combo1.AddItem UCase$("BORAK")
    Combo1.AddItem UCase$("BORN")
    Combo1.AddItem UCase$("BORTONE")
    Combo1.AddItem UCase$("BORZYMATE")
    Combo1.AddItem UCase$("BOTKIN")
    Combo1.AddItem UCase$("BOURNE")
    Combo1.AddItem UCase$("BOUTWELL")
    Combo1.AddItem UCase$("BOWDEN")
    Combo1.AddItem UCase$("BOWER")
    Combo1.AddItem UCase$("BOYKIN")
    Combo1.AddItem UCase$("BOYLE")
    Combo1.AddItem UCase$("BRADFORD")
    Combo1.AddItem UCase$("BRANDT")
    Combo1.AddItem UCase$("BRANN")
    Combo1.AddItem UCase$("BRANNON")
    Combo1.AddItem UCase$("BRANSTETTER")
    Combo1.AddItem UCase$("BRANTLEY")
    Combo1.AddItem UCase$("BRAUE")
    Combo1.AddItem UCase$("BRICMONT")
    Combo1.AddItem UCase$("BRIDGE")
    Combo1.AddItem UCase$("BRIGGS")
    Combo1.AddItem UCase$("BROADFOOT")
    Combo1.AddItem UCase$("Brodka")
    Combo1.AddItem UCase$("BROHN")
    Combo1.AddItem UCase$("BRONNER")
    Combo1.AddItem UCase$("brooks")
    Combo1.AddItem UCase$("BROWN")
    Combo1.AddItem UCase$("BROWNE")
    Combo1.AddItem UCase$("BROWNELL")
    Combo1.AddItem UCase$("BROWSER")
    Combo1.AddItem UCase$("BRUCE")
    Combo1.AddItem UCase$("BRUMLEY")
    Combo1.AddItem UCase$("BRUNO")
    Combo1.AddItem UCase$("BRUNS")
    Combo1.AddItem UCase$("BRYER")
    Combo1.AddItem UCase$("BRYSON")
    Combo1.AddItem UCase$("BUCKLAND")
    Combo1.AddItem UCase$("BUFKIN")
    Combo1.AddItem UCase$("BULLITT")
    Combo1.AddItem UCase$("BURCH")
    Combo1.AddItem UCase$("BURKE")
    Combo1.AddItem UCase$("BURKEEN")
    Combo1.AddItem UCase$("BURKHART")
    Combo1.AddItem UCase$("BURMAN")
    Combo1.AddItem UCase$("Burns")
    Combo1.AddItem UCase$("BURRIDGE")
    Combo1.AddItem UCase$("BURTON")
    Combo1.AddItem UCase$("BUSH")
    Combo1.AddItem UCase$("BUSHEY")
    Combo1.AddItem UCase$("BUSZKIEWICZ")
    Combo1.AddItem UCase$("BUTTS")
    Combo1.AddItem UCase$("C")
    Combo1.AddItem UCase$("CABLE")
    Combo1.AddItem UCase$("CABRAL")
    Combo1.AddItem UCase$("CADHLA")
    Combo1.AddItem UCase$("CAINES")
    Combo1.AddItem UCase$("CALLAHAN")
    Combo1.AddItem UCase$("CALLOW")
    Combo1.AddItem UCase$("CALOURO")
    Combo1.AddItem UCase$("CAMPBELL")
    Combo1.AddItem UCase$("CAMPFIELD")
    Combo1.AddItem UCase$("CAPLAN")
    Combo1.AddItem UCase$("CARD")
    Combo1.AddItem UCase$("CARLE")
    Combo1.AddItem UCase$("CARMEIN")
    Combo1.AddItem UCase$("CARPENTER")
    Combo1.AddItem UCase$("CARR")
    Combo1.AddItem UCase$("CARVIN")
    Combo1.AddItem UCase$("CARY")
    Combo1.AddItem UCase$("CASEY")
    Combo1.AddItem UCase$("CASSARINO")
    Combo1.AddItem UCase$("CASSIDY")
    Combo1.AddItem UCase$("CASTELLANO")
    Combo1.AddItem UCase$("CAULKINS")
    Combo1.AddItem UCase$("CAWLEW")
    Combo1.AddItem UCase$("CELAYETA")
    Combo1.AddItem UCase$("CESZIK")
    Combo1.AddItem UCase$("CHADWICK")
    Combo1.AddItem UCase$("CHAMBERS")
    Combo1.AddItem UCase$("CHAMBLEE")
    Combo1.AddItem UCase$("CHAMPIGNY")
    Combo1.AddItem UCase$("CHAMPION")
    Combo1.AddItem UCase$("CHAN")
    Combo1.AddItem UCase$("CHAO")
    Combo1.AddItem UCase$("CHAPMAN")
    Combo1.AddItem UCase$("CHAPNICK")
    Combo1.AddItem UCase$("CHAREST")
    Combo1.AddItem UCase$("CHARTON")
    Combo1.AddItem UCase$("CHASE")
    Combo1.AddItem UCase$("CHAST")
    Combo1.AddItem UCase$("CHENG")
    Combo1.AddItem UCase$("CHIELDS")
    Combo1.AddItem UCase$("CHIGGES")
    Combo1.AddItem UCase$("Choi")
    Combo1.AddItem UCase$("CHOMYOK")
    Combo1.AddItem UCase$("CHOW")
    Combo1.AddItem UCase$("CHRISTIANSON")
    Combo1.AddItem UCase$("CHUNG")
    Combo1.AddItem UCase$("CHURBUCK")
    Combo1.AddItem UCase$("CHWATAL")
    Combo1.AddItem UCase$("CICCIARELLA")
    Combo1.AddItem UCase$("cipriano")
    Combo1.AddItem UCase$("CLAIL")
    Combo1.AddItem UCase$("CLARK")
    Combo1.AddItem UCase$("CLASKY")
    Combo1.AddItem UCase$("CLAYTON")
    Combo1.AddItem UCase$("CLIFFORD")
    Combo1.AddItem UCase$("CLINE")
    Combo1.AddItem UCase$("CLINK")
    Combo1.AddItem UCase$("COATES")
    Combo1.AddItem UCase$("COHEN")
    Combo1.AddItem UCase$("COJOCARIU")
    Combo1.AddItem UCase$("COLE")
    Combo1.AddItem UCase$("COLELLA")
    Combo1.AddItem UCase$("Collica")
    Combo1.AddItem UCase$("COLLINS")
    Combo1.AddItem UCase$("COLONTONIO")
    Combo1.AddItem UCase$("COLVEN")
    Combo1.AddItem UCase$("COMEGYS")
    Combo1.AddItem UCase$("COMSTOCK")
    Combo1.AddItem UCase$("CONLIFFE")
    Combo1.AddItem UCase$("CONNER")
    Combo1.AddItem UCase$("CONNLEY")
    Combo1.AddItem UCase$("CONNOR")
    Combo1.AddItem UCase$("CONRAD")
    Combo1.AddItem UCase$("COOK")
    Combo1.AddItem UCase$("COOKE")
    Combo1.AddItem UCase$("COOMBS")
    Combo1.AddItem UCase$("Coon")
    Combo1.AddItem UCase$("cooper")
    Combo1.AddItem UCase$("COORDINATOR")
    Combo1.AddItem UCase$("COORENS")
    Combo1.AddItem UCase$("COPELAND")
    Combo1.AddItem UCase$("CORBETT")
    Combo1.AddItem UCase$("CORLESS")
    Combo1.AddItem UCase$("CORRAL")
    Combo1.AddItem UCase$("CORSI")
    Combo1.AddItem UCase$("COSEL")
    Combo1.AddItem UCase$("COUGHLIN")
    Combo1.AddItem UCase$("COUPER")
    Combo1.AddItem UCase$("COUSINEAU")
    Combo1.AddItem UCase$("COVAS")
    Combo1.AddItem UCase$("COX")
    Combo1.AddItem UCase$("COXEY")
    Combo1.AddItem UCase$("CRAGOE")
    Combo1.AddItem UCase$("CRAVENER")
    Combo1.AddItem UCase$("CREASY")
    Combo1.AddItem UCase$("CRIDER")
    Combo1.AddItem UCase$("CRITES")
    Combo1.AddItem UCase$("CROFT")
    Combo1.AddItem UCase$("CROSS")
    Combo1.AddItem UCase$("CROWE")
    Combo1.AddItem UCase$("CROWELL")
    Combo1.AddItem UCase$("CRUMPLER")
    Combo1.AddItem UCase$("CRUZ")
    Combo1.AddItem UCase$("CUMMINS")
    Combo1.AddItem UCase$("Cunningham")
    Combo1.AddItem UCase$("CUOZZO")
    Combo1.AddItem UCase$("CURRY")
    Combo1.AddItem UCase$("CURTIS")
    Combo1.AddItem UCase$("CUTRARA")
    Combo1.AddItem UCase$("CYBULSKI")
    Combo1.AddItem UCase$("DAHL")
    Combo1.AddItem UCase$("DAHLIN")
    Combo1.AddItem UCase$("DAKOS")
    Combo1.AddItem UCase$("DALTON")
    Combo1.AddItem UCase$("DAMON")
    Combo1.AddItem UCase$("DANIELS")
    Combo1.AddItem UCase$("DANNER")
    Combo1.AddItem UCase$("DANTZLER")
    Combo1.AddItem UCase$("DAVIE")
    Combo1.AddItem UCase$("DAVIES")
    Combo1.AddItem UCase$("DAVIS")
    Combo1.AddItem UCase$("DAWSON")
    Combo1.AddItem UCase$("DEADY")
    Combo1.AddItem UCase$("DEAL")
    Combo1.AddItem UCase$("DEAN")
    Combo1.AddItem UCase$("DEARBECK")
    Combo1.AddItem UCase$("DEAVER")
    Combo1.AddItem UCase$("DEBRA")
    Combo1.AddItem UCase$("DECELLES")
    Combo1.AddItem UCase$("DEFOE")
    Combo1.AddItem UCase$("DEFOOR")
    Combo1.AddItem UCase$("DEJONGHE")
    Combo1.AddItem UCase$("DELAIR")
    Combo1.AddItem UCase$("DELARGEY")
    Combo1.AddItem UCase$("DELLORFANO")
    Combo1.AddItem UCase$("DEMERITT")
    Combo1.AddItem UCase$("DEMMITT")
    Combo1.AddItem UCase$("DEMMON")
    Combo1.AddItem UCase$("DENAIS")
    Combo1.AddItem UCase$("DENNING")
    Combo1.AddItem UCase$("DENNIS")
    Combo1.AddItem UCase$("DENNISON")
    Combo1.AddItem UCase$("DEROBERTS")
    Combo1.AddItem UCase$("DESHONG")
    Combo1.AddItem UCase$("DESKINS")
    Combo1.AddItem UCase$("DESMOND")
    Combo1.AddItem UCase$("DEWEESE")
    Combo1.AddItem UCase$("DEWITT")
    Combo1.AddItem UCase$("Diachun")
    Combo1.AddItem UCase$("diamond")
    Combo1.AddItem UCase$("DIAZ")
    Combo1.AddItem UCase$("DICKSON")
    Combo1.AddItem UCase$("DIETZ")
    Combo1.AddItem UCase$("DIFRANCESCO")
    Combo1.AddItem UCase$("DIJAK")
    Combo1.AddItem UCase$("DILWORTH")
    Combo1.AddItem UCase$("DIMICK")
    Combo1.AddItem UCase$("Dinse")
    Combo1.AddItem UCase$("DIROFF")
    Combo1.AddItem UCase$("DISHAROON")
    Combo1.AddItem UCase$("DISHON")
    Combo1.AddItem UCase$("DITTMAR")
    Combo1.AddItem UCase$("DOCKENDORF")
    Combo1.AddItem UCase$("DOLINSKY")
    Combo1.AddItem UCase$("DOLSEN")
    Combo1.AddItem UCase$("DONICA")
    Combo1.AddItem UCase$("DONLEY")
    Combo1.AddItem UCase$("DONOVAN")
    Combo1.AddItem UCase$("DORSEY")
    Combo1.AddItem UCase$("DOUGLASS")
    Combo1.AddItem UCase$("DRAICCHIO")
    Combo1.AddItem UCase$("DRAKE")
    Combo1.AddItem UCase$("DREBES")
    Combo1.AddItem UCase$("DRISCOLL")
    Combo1.AddItem UCase$("DROZD")
    Combo1.AddItem UCase$("DRUKER")
    Combo1.AddItem UCase$("DRUMMOND")
    Combo1.AddItem UCase$("DUCREUX")
    Combo1.AddItem UCase$("DUERR")
    Combo1.AddItem UCase$("DUFFIN")
    Combo1.AddItem UCase$("DUFRESNE")
    Combo1.AddItem UCase$("DUKES")
    Combo1.AddItem UCase$("DUMONT")
    Combo1.AddItem UCase$("DUNCAN")
    Combo1.AddItem UCase$("DUNLAP")
    Combo1.AddItem UCase$("DUNN")
    Combo1.AddItem UCase$("DUPONT")
    Combo1.AddItem UCase$("DUVALL")
    Combo1.AddItem UCase$("DYE")
    Combo1.AddItem UCase$("DYKAS")
    Combo1.AddItem UCase$("DYKE")
    Combo1.AddItem UCase$("DYSON-HUDSON")
    Combo1.AddItem UCase$("DZUDZ")
    Combo1.AddItem UCase$("EAKEN")
    Combo1.AddItem UCase$("EASTHAM")
    Combo1.AddItem UCase$("EASTON")
    Combo1.AddItem UCase$("EBERSOLE")
    Combo1.AddItem UCase$("EBY")
    Combo1.AddItem UCase$("EDER")
    Combo1.AddItem UCase$("EDGINGTON")
    Combo1.AddItem UCase$("EDISON")
    Combo1.AddItem UCase$("EDMUNDS")
    Combo1.AddItem UCase$("EDWARDS")
    Combo1.AddItem UCase$("EDWARDSON")
    Combo1.AddItem UCase$("EHRENSHAFT")
    Combo1.AddItem UCase$("EISENHART")
    Combo1.AddItem UCase$("ELABI")
    Combo1.AddItem UCase$("ELALAMI")
    Combo1.AddItem UCase$("ELDER")
    Combo1.AddItem UCase$("ELLINGEN")
    Combo1.AddItem UCase$("ELLINGSON")
    Combo1.AddItem UCase$("ELLIS")
    Combo1.AddItem UCase$("ELY")
    Combo1.AddItem UCase$("EMERSON")
    Combo1.AddItem UCase$("EMMER")
    Combo1.AddItem UCase$("ENGEBRETSON")
    Combo1.AddItem UCase$("ENGELMAN")
    Combo1.AddItem UCase$("ENNIS")
    Combo1.AddItem UCase$("ENOS")
    Combo1.AddItem UCase$("EPSTEIN")
    Combo1.AddItem UCase$("ERICKSON")
    Combo1.AddItem UCase$("ERKFITZ")
    Combo1.AddItem UCase$("ESLER")
    Combo1.AddItem UCase$("ESTES")
    Combo1.AddItem UCase$("EVANS")
    Combo1.AddItem UCase$("EVEZIC")
    Combo1.AddItem UCase$("EWEN")
    Combo1.AddItem UCase$("EWIG")
    Combo1.AddItem UCase$("EWING")
    Combo1.AddItem UCase$("FABRICANT")
    Combo1.AddItem UCase$("FACZAN")
    Combo1.AddItem UCase$("FAHLBERG")
    Combo1.AddItem UCase$("fahrlander")
    Combo1.AddItem UCase$("FAITOS")
    Combo1.AddItem UCase$("FALCK")
    Combo1.AddItem UCase$("Falk")
    Combo1.AddItem UCase$("FAN")
    Combo1.AddItem UCase$("FANCHER")
    Combo1.AddItem UCase$("FARLEY")
    Combo1.AddItem UCase$("Farm")
    Combo1.AddItem UCase$("FARMER")
    Combo1.AddItem UCase$("FARRE")
    Combo1.AddItem UCase$("FARRELL")
    Combo1.AddItem UCase$("FAULKNER")
    Combo1.AddItem UCase$("FAUREZ")
    Combo1.AddItem UCase$("FAY")
    Combo1.AddItem UCase$("FEINBERG")
    Combo1.AddItem UCase$("FELDMAN")
    Combo1.AddItem UCase$("FERGUSON")
    Combo1.AddItem UCase$("FERRELL")
    Combo1.AddItem UCase$("FERRO")
    Combo1.AddItem UCase$("FEUER")
    Combo1.AddItem UCase$("FIELD")
    Combo1.AddItem UCase$("FIELDMAN")
    Combo1.AddItem UCase$("FIELDS")
    Combo1.AddItem UCase$("FINEFROCK")
    Combo1.AddItem UCase$("FINKELSTEIN")
    Combo1.AddItem UCase$("FINTO")
    Combo1.AddItem UCase$("FIORE")
    Combo1.AddItem UCase$("FITLER")
    Combo1.AddItem UCase$("FITZPATRICK")
    Combo1.AddItem UCase$("FLAGG")
    Combo1.AddItem UCase$("FLEAGLE")
    Combo1.AddItem UCase$("FLEMING")
    Combo1.AddItem UCase$("FONSECA")
    Combo1.AddItem UCase$("FONTAINE")
    Combo1.AddItem UCase$("FORBES")
    Combo1.AddItem UCase$("FORBIN")
    Combo1.AddItem UCase$("FORBUSH")
    Combo1.AddItem UCase$("FORD")
    Combo1.AddItem UCase$("FORMAN")
    Combo1.AddItem UCase$("FORSYTHE")
    Combo1.AddItem UCase$("FOSSEN")
    Combo1.AddItem UCase$("Fouch")
    Combo1.AddItem UCase$("FOUNTAINE")
    Combo1.AddItem UCase$("FOX")
    Combo1.AddItem UCase$("FOY")
    Combo1.AddItem UCase$("FRALICK")
    Combo1.AddItem UCase$("FRANCIS")
    Combo1.AddItem UCase$("franck")
    Combo1.AddItem UCase$("frank")
    Combo1.AddItem UCase$("FRANKE")
    Combo1.AddItem UCase$("FRANKHOUSER")
    Combo1.AddItem UCase$("FRASIER")
    Combo1.AddItem UCase$("FRECHMAN")
    Combo1.AddItem UCase$("FREDERICKSON")
    Combo1.AddItem UCase$("FREEHILL")
    Combo1.AddItem UCase$("FREEMAN")
    Combo1.AddItem UCase$("FRENCH")
    Combo1.AddItem UCase$("FRESOLI")
    Combo1.AddItem UCase$("FRETZ")
    Combo1.AddItem UCase$("FRIAS")
    Combo1.AddItem UCase$("FRIEDLAND")
    Combo1.AddItem UCase$("FRIEDMAN")
    Combo1.AddItem UCase$("FRIER")
    Combo1.AddItem UCase$("FUENTES")
    Combo1.AddItem UCase$("FUFFICHEN")
    Combo1.AddItem UCase$("FULDA")
    Combo1.AddItem UCase$("FULLER")
    Combo1.AddItem UCase$("FULTER")
    Combo1.AddItem UCase$("FUSCO")
    Combo1.AddItem UCase$("FUTCH")
    Combo1.AddItem UCase$("GAFFNEY")
    Combo1.AddItem UCase$("GAFRON")
    Combo1.AddItem UCase$("GAGLIARDI")
    Combo1.AddItem UCase$("GAGNON")
    Combo1.AddItem UCase$("GALLAGHER")
    Combo1.AddItem UCase$("GALLAHER")
    Combo1.AddItem UCase$("GALUSZKA")
    Combo1.AddItem UCase$("GANDY")
    Combo1.AddItem UCase$("GANGSTEE")
    Combo1.AddItem UCase$("GANSHIRT")
    Combo1.AddItem UCase$("GARDES")
    Combo1.AddItem UCase$("Gardner")
    Combo1.AddItem UCase$("Garfinkel")
    Combo1.AddItem UCase$("GARRISON")
    Combo1.AddItem UCase$("GARVEY")
    Combo1.AddItem UCase$("GATCH")
    Combo1.AddItem UCase$("GAUDREAULT")
    Combo1.AddItem UCase$("GAUTHIER")
    Combo1.AddItem UCase$("GAY")
    Combo1.AddItem UCase$("GAZIA")
    Combo1.AddItem UCase$("GEARHART")
    Combo1.AddItem UCase$("GEARING")
    Combo1.AddItem UCase$("GEE")
    Combo1.AddItem UCase$("GEIGER")
    Combo1.AddItem UCase$("GEORGE")
    Combo1.AddItem UCase$("GERALD")
    Combo1.AddItem UCase$("GERBER")
    Combo1.AddItem UCase$("GERMANO")
    Combo1.AddItem UCase$("GERTZ")
    Combo1.AddItem UCase$("GETTYS")
    Combo1.AddItem UCase$("GEVER")
    Combo1.AddItem UCase$("GHOLSON")
    Combo1.AddItem UCase$("GIANNINI")
    Combo1.AddItem UCase$("GIBB")
    Combo1.AddItem UCase$("GIBBONS")
    Combo1.AddItem UCase$("GIBSON")
    Combo1.AddItem UCase$("GILGEN")
    Combo1.AddItem UCase$("GILLBANKS")
    Combo1.AddItem UCase$("GILLEN")
    Combo1.AddItem UCase$("GILLIAM")
    Combo1.AddItem UCase$("GILLMORE")
    Combo1.AddItem UCase$("GILMORE")
    Combo1.AddItem UCase$("GIOVE")
    Combo1.AddItem UCase$("GIRMAN")
    Combo1.AddItem UCase$("GLASS")
    Combo1.AddItem UCase$("GLOSSBRENNER")
    Combo1.AddItem UCase$("GODDARD")
    Combo1.AddItem UCase$("GODIN")
    Combo1.AddItem UCase$("GOLDBERG")
    Combo1.AddItem UCase$("GOLDING")
    Combo1.AddItem UCase$("GOLDURAN")
    Combo1.AddItem UCase$("GOOD")
    Combo1.AddItem UCase$("GOODENOUGH")
    Combo1.AddItem UCase$("GOODIN")
    Combo1.AddItem UCase$("GOODMAN")
    Combo1.AddItem UCase$("Gordemer")
    Combo1.AddItem UCase$("gould")
    Combo1.AddItem UCase$("GOURLAY")
    Combo1.AddItem UCase$("GRAFF")
    Combo1.AddItem UCase$("GRAHAM")
    Combo1.AddItem UCase$("GRAINGER")
    Combo1.AddItem UCase$("GRALLA")
    Combo1.AddItem UCase$("Grant")
    Combo1.AddItem UCase$("GRASGREEN")
    Combo1.AddItem UCase$("GRAY")
    Combo1.AddItem UCase$("Green")
    Combo1.AddItem UCase$("GREENE")
    Combo1.AddItem UCase$("GREER")
    Combo1.AddItem UCase$("GREINER")
    Combo1.AddItem UCase$("GRETTUM")
    Combo1.AddItem UCase$("GREY")
    Combo1.AddItem UCase$("GRIFFIN")
    Combo1.AddItem UCase$("GRIMM")
    Combo1.AddItem UCase$("GROENENDYLE")
    Combo1.AddItem UCase$("GROGAN")
    Combo1.AddItem UCase$("GROH")
    Combo1.AddItem UCase$("GROSS")
    Combo1.AddItem UCase$("Grosse")
    Combo1.AddItem UCase$("GROVE")
    Combo1.AddItem UCase$("GRUBER")
    Combo1.AddItem UCase$("GRUNNILL")
    Combo1.AddItem UCase$("GUITARD")
    Combo1.AddItem UCase$("GUNDEL")
    Combo1.AddItem UCase$("GUNDERLOY")
    Combo1.AddItem UCase$("GUROWSKI")
    Combo1.AddItem UCase$("GUTIERREZ")
    Combo1.AddItem UCase$("GYNN")
    Combo1.AddItem UCase$("GYSI")
    Combo1.AddItem UCase$("Haan")
    Combo1.AddItem UCase$("HABEGGER")
    Combo1.AddItem UCase$("haff")
    Combo1.AddItem UCase$("HAGMAN")
    Combo1.AddItem UCase$("HAKIM")
    Combo1.AddItem UCase$("HALDEMAN")
    Combo1.AddItem UCase$("HALL")
    Combo1.AddItem UCase$("HALLIDAY")
    Combo1.AddItem UCase$("HALSTED")
    Combo1.AddItem UCase$("HAMILTON")
    Combo1.AddItem UCase$("HAMMOCK")
    Combo1.AddItem UCase$("Hammond")
    Combo1.AddItem UCase$("HAMPTON")
    Combo1.AddItem UCase$("HANSEL")
    Combo1.AddItem UCase$("HANSON")
    Combo1.AddItem UCase$("HARBECK")
    Combo1.AddItem UCase$("HARBIN")
    Combo1.AddItem UCase$("Hardenburgh")
    Combo1.AddItem UCase$("HARDWICK")
    Combo1.AddItem UCase$("HARDY")
    Combo1.AddItem UCase$("HARE")
    Combo1.AddItem UCase$("HARLESS")
    Combo1.AddItem UCase$("HARMON")
    Combo1.AddItem UCase$("HARRIMAN")
    Combo1.AddItem UCase$("HARRIS")
    Combo1.AddItem UCase$("HARRISON")
    Combo1.AddItem UCase$("HARTY")
    Combo1.AddItem UCase$("HARVEY")
    Combo1.AddItem UCase$("HASSELMAN")
    Combo1.AddItem UCase$("Hatch")
    Combo1.AddItem UCase$("HAUB")
    Combo1.AddItem UCase$("HAVER")
    Combo1.AddItem UCase$("HAWKINS")
    Combo1.AddItem UCase$("HAWLEY")
    Combo1.AddItem UCase$("HAYDEN")
    Combo1.AddItem UCase$("HAYES")
    Combo1.AddItem UCase$("HAYMANN")
    Combo1.AddItem UCase$("HAZEN")
    Combo1.AddItem UCase$("HAZLETT")
    Combo1.AddItem UCase$("HEAD")
    Combo1.AddItem UCase$("HEATON")
    Combo1.AddItem UCase$("heck")
    Combo1.AddItem UCase$("HEDBERG")
    Combo1.AddItem UCase$("HEIDECKE")
    Combo1.AddItem UCase$("HEILY")
    Combo1.AddItem UCase$("HEIN")
    Combo1.AddItem UCase$("HEINER")
    Combo1.AddItem UCase$("HELDER")
    Combo1.AddItem UCase$("Heller")
    Combo1.AddItem UCase$("HENKEL")
    Combo1.AddItem UCase$("HERCZ")
    Combo1.AddItem UCase$("HERMAN")
    Combo1.AddItem UCase$("HERNANDEZ")
    Combo1.AddItem UCase$("HERRICK")
    Combo1.AddItem UCase$("HERRIOTT")
    Combo1.AddItem UCase$("HERZ")
    Combo1.AddItem UCase$("H�TRU")
    Combo1.AddItem UCase$("HEVER")
    Combo1.AddItem UCase$("HEYDEMANN")
    Combo1.AddItem UCase$("HEYL")
    Combo1.AddItem UCase$("HEYMANN")
    Combo1.AddItem UCase$("HIBBERT")
    Combo1.AddItem UCase$("HICKERSON")
    Combo1.AddItem UCase$("HICKLING")
    Combo1.AddItem UCase$("HICKS")
    Combo1.AddItem UCase$("HIGGINS")
    Combo1.AddItem UCase$("HIGGS")
    Combo1.AddItem UCase$("HILBERS")
    Combo1.AddItem UCase$("HILD")
    Combo1.AddItem UCase$("HILLERBRAND")
    Combo1.AddItem UCase$("HILLEY")
    Combo1.AddItem UCase$("HINSON")
    Combo1.AddItem UCase$("HINTON")
    Combo1.AddItem UCase$("HOECK")
    Combo1.AddItem UCase$("HOFFMAN")
    Combo1.AddItem UCase$("HOGAN")
    Combo1.AddItem UCase$("HOITT")
    Combo1.AddItem UCase$("HOLCOMBE")
    Combo1.AddItem UCase$("HOLLER")
    Combo1.AddItem UCase$("HOLMES")
    Combo1.AddItem UCase$("HOLZINGER")
    Combo1.AddItem UCase$("HONOROE")
    Combo1.AddItem UCase$("HOPKINS")
    Combo1.AddItem UCase$("HOPPER")
    Combo1.AddItem UCase$("HORSTMAN")
    Combo1.AddItem UCase$("HOSSACK")
    Combo1.AddItem UCase$("Howard")
    Combo1.AddItem UCase$("HRUSOVSZKY")
    Combo1.AddItem UCase$("HUBER")
    Combo1.AddItem UCase$("HUDAK")
    Combo1.AddItem UCase$("HUDSON")
    Combo1.AddItem UCase$("HUEBSCHWERLEN")
    Combo1.AddItem UCase$("HUGHES")
    Combo1.AddItem UCase$("HULL")
    Combo1.AddItem UCase$("HULT")
    Combo1.AddItem UCase$("HUMPHREY")
    Combo1.AddItem UCase$("HUNT")
    Combo1.AddItem UCase$("HURLEY")
    Combo1.AddItem UCase$("HURTEAU")
    Combo1.AddItem UCase$("HUSNEY")
    Combo1.AddItem UCase$("HUSSEIN")
    Combo1.AddItem UCase$("HUTCHINS")
    Combo1.AddItem UCase$("HUTCHISON")
    Combo1.AddItem UCase$("HUTSON")
    Combo1.AddItem UCase$("HUYSER")
    Combo1.AddItem UCase$("HYE")
    Combo1.AddItem UCase$("HYSNER")
    Combo1.AddItem UCase$("IMMIG")
    Combo1.AddItem UCase$("INFANTE")
    Combo1.AddItem UCase$("Innusa")
    Combo1.AddItem UCase$("ISOTALO")
    Combo1.AddItem UCase$("IVERSON")
    Combo1.AddItem UCase$("IWASCHKIN")
    Combo1.AddItem UCase$("IYER")
    Combo1.AddItem UCase$("JACKMAN")
    Combo1.AddItem UCase$("JACKSON")
    Combo1.AddItem UCase$("JACMON")
    Combo1.AddItem UCase$("JACOBSON")
    Combo1.AddItem UCase$("JALBUENA")
    Combo1.AddItem UCase$("JALLER")
    Combo1.AddItem UCase$("JAMSGARD")
    Combo1.AddItem UCase$("JANSON")
    Combo1.AddItem UCase$("JARVIS")
    Combo1.AddItem UCase$("JASAITIS")
    Combo1.AddItem UCase$("JAY")
    Combo1.AddItem UCase$("JEDLINSKI")
    Combo1.AddItem UCase$("JEFFERS")
    Combo1.AddItem UCase$("JEGEDE")
    Combo1.AddItem UCase$("JENKINS")
    Combo1.AddItem UCase$("Jenks")
    Combo1.AddItem UCase$("JEROME")
    Combo1.AddItem UCase$("JETSON")
    Combo1.AddItem UCase$("JOHNS")
    Combo1.AddItem UCase$("Johnson")
    Combo1.AddItem UCase$("JOLLEY")
    Combo1.AddItem UCase$("JONES")
    Combo1.AddItem UCase$("JORDAN")
    Combo1.AddItem UCase$("JORGE")
    Combo1.AddItem UCase$("JORGENSEN")
    Combo1.AddItem UCase$("JOYCE")
    Combo1.AddItem UCase$("JURGENSEN")
    Combo1.AddItem UCase$("KAIRIS")
    Combo1.AddItem UCase$("KALISS")
    Combo1.AddItem UCase$("KAMMEYER")
    Combo1.AddItem UCase$("KANGLEY")
    Combo1.AddItem UCase$("KAPADIA")
    Combo1.AddItem UCase$("KARPINSKY")
    Combo1.AddItem UCase$("KATCHER")
    Combo1.AddItem UCase$("KATZ")
    Combo1.AddItem UCase$("KAUER")
    Combo1.AddItem UCase$("KAUFMAN")
    Combo1.AddItem UCase$("Keavitt")
    Combo1.AddItem UCase$("KEHO")
    Combo1.AddItem UCase$("KEILY")
    Combo1.AddItem UCase$("KELLER")
    Combo1.AddItem UCase$("KELLERMAN")
    Combo1.AddItem UCase$("KELLOGG")
    Combo1.AddItem UCase$("Kelly")
    Combo1.AddItem UCase$("KENDER")
    Combo1.AddItem UCase$("KENNINGTON")
    Combo1.AddItem UCase$("KENNY")
    Combo1.AddItem UCase$("KEOHANE")
    Combo1.AddItem UCase$("KERNS")
    Combo1.AddItem UCase$("KERR")
    Combo1.AddItem UCase$("KESLER")
    Combo1.AddItem UCase$("KESNER")
    Combo1.AddItem UCase$("KETCHAM")
    Combo1.AddItem UCase$("KETNER")
    Combo1.AddItem UCase$("KHAN")
    Combo1.AddItem UCase$("KHOYLAR")
    Combo1.AddItem UCase$("KIERNAN")
    Combo1.AddItem UCase$("KIM")
    Combo1.AddItem UCase$("KINDRED")
    Combo1.AddItem UCase$("KING")
    Combo1.AddItem UCase$("KINKEAD")
    Combo1.AddItem UCase$("KIPLINGER")
    Combo1.AddItem UCase$("KIRCHNER")
    Combo1.AddItem UCase$("KIRK")
    Combo1.AddItem UCase$("KIRSCH")
    Combo1.AddItem UCase$("KLEIN")
    Combo1.AddItem UCase$("KLIEVER")
    Combo1.AddItem UCase$("KLINE")
    Combo1.AddItem UCase$("KLINGER")
    Combo1.AddItem UCase$("KNIGHT")
    Combo1.AddItem UCase$("KNOBLAUCH")
    Combo1.AddItem UCase$("KNUDSEN")
    Combo1.AddItem UCase$("KOBB")
    Combo1.AddItem UCase$("KOBLER")
    Combo1.AddItem UCase$("KOEHLER")
    Combo1.AddItem UCase$("KOEPKA")
    Combo1.AddItem UCase$("KOESTER")
    Combo1.AddItem UCase$("KOLAR")
    Combo1.AddItem UCase$("KOLASA")
    Combo1.AddItem UCase$("KOSLOW")
    Combo1.AddItem UCase$("KOTHE")
    Combo1.AddItem UCase$("KOWALCZYK")
    Combo1.AddItem UCase$("KRACHT")
    Combo1.AddItem UCase$("KRAFT")
    Combo1.AddItem UCase$("KRAHMER")
    Combo1.AddItem UCase$("KRAKOW")
    Combo1.AddItem UCase$("KRAMER")
    Combo1.AddItem UCase$("KRAUSE")
    Combo1.AddItem UCase$("KRAYER")
    Combo1.AddItem UCase$("KREISLER")
    Combo1.AddItem UCase$("KREYLING")
    Combo1.AddItem UCase$("KRISTOFF")
    Combo1.AddItem UCase$("KROOPINICK")
    Combo1.AddItem UCase$("KULLMAN")
    Combo1.AddItem UCase$("KWATER")
    Combo1.AddItem UCase$("KYLE")
    Combo1.AddItem UCase$("LABERIS")
    Combo1.AddItem UCase$("LAFEIR")
    Combo1.AddItem UCase$("LAIR")
    Combo1.AddItem UCase$("LAIRD")
    Combo1.AddItem UCase$("LALONDE")
    Combo1.AddItem UCase$("LAMINARCA")
    Combo1.AddItem UCase$("LANDRY")
    Combo1.AddItem UCase$("Lane")
    Combo1.AddItem UCase$("LANG")
    Combo1.AddItem UCase$("LANGA")
    Combo1.AddItem UCase$("LANGER")
    Combo1.AddItem UCase$("LAPOINTE")
    Combo1.AddItem UCase$("LARIMORE")
    Combo1.AddItem UCase$("LARIS")
    Combo1.AddItem UCase$("LASZKO")
    Combo1.AddItem UCase$("LAUGHLIN")
    Combo1.AddItem UCase$("LAURIA")
    Combo1.AddItem UCase$("LAVIOLETTE")
    Combo1.AddItem UCase$("LAW")
    Combo1.AddItem UCase$("LAWLESS")
    Combo1.AddItem UCase$("LAWSON")
    Combo1.AddItem UCase$("LAWTON")
    Combo1.AddItem UCase$("LEBEIKO")
    Combo1.AddItem UCase$("LEDBETTER")
    Combo1.AddItem UCase$("LEE")
    Combo1.AddItem UCase$("LEESE")
    Combo1.AddItem UCase$("LEGGIO")
    Combo1.AddItem UCase$("LEIBSON")
    Combo1.AddItem UCase$("LELCHITSKY")
    Combo1.AddItem UCase$("LEMON")
    Combo1.AddItem UCase$("leno")
    Combo1.AddItem UCase$("Leonard")
    Combo1.AddItem UCase$("LESSER")
    Combo1.AddItem UCase$("LETOWT")
    Combo1.AddItem UCase$("LEU")
    Combo1.AddItem UCase$("LEUNG")
    Combo1.AddItem UCase$("LEVIN")
    Combo1.AddItem UCase$("LEVITT")
    Combo1.AddItem UCase$("LEVY")
    Combo1.AddItem UCase$("LEWART")
    Combo1.AddItem UCase$("LEWIS")
    Combo1.AddItem UCase$("Marsh")
    Combo1.AddItem UCase$("Martin")
    Combo1.AddItem UCase$("Martinez")
    Combo1.AddItem UCase$("Morgan")
    Combo1.AddItem UCase$("Morris")
    Combo1.AddItem UCase$("Morse")
    Combo1.AddItem UCase$("Parker")
    Combo1.AddItem UCase$("Parrett")
    Combo1.AddItem UCase$("Paterson")
    Combo1.AddItem UCase$("Richman")
    Combo1.AddItem UCase$("Rieman")
    Combo1.AddItem UCase$("Rinehart")
    Combo1.AddItem UCase$("Shaiman")
    Combo1.AddItem UCase$("Shaw")
    Combo1.AddItem UCase$("Shellman")
    Combo1.AddItem UCase$("Sumner")
    Combo1.AddItem UCase$("Sutherland")
    Combo1.AddItem UCase$("Swanson")
    Combo1.AddItem UCase$("Waage")
    Combo1.AddItem UCase$("Wagner")
    Combo1.AddItem UCase$("Walker")
    Combo1.AddItem UCase$("Wilson")
    Combo1.AddItem UCase$("Wong")
    Combo1.AddItem UCase$("Younger")
End Sub

Sub Form_Unload (Cancel As Integer)
    End
End Sub