Generic use of a list of hard coded countrys. Simply call the funtion call ComboFill(combobox name
Generic use of a list of hard coded countrys. Simply call the funtion "call ComboFill(combobox name)"
API Declarations
'copy all this in to a module
'and then in your form call this function:
'ComboFill(combobox name)
'Where combobox is the name of the combobox.
Rate Generic use of a list of hard coded countrys. Simply call the funtion call ComboFill(combobox name
(1(1 Vote))
Public Function comboFill(cmbFill As ComboBox)
'--------------combo-------------------------------------------------------------
With cmbFill
.AddItem "Afghanistan"
.AddItem "Albania"
.AddItem "Algeria"
.AddItem "American Samoa"
.AddItem "Andorra"
.AddItem "Angola"
.AddItem "Anguilla"
.AddItem "Antarctica"
.AddItem "Antigua and Barbuda"
.AddItem "Argentina"
.AddItem "Armenia"
.AddItem "Aruba"
.AddItem "Australia"
.AddItem "Austria"
.AddItem "Azerbaijan"
.AddItem "Bahamas"
.AddItem "Bahrain"
.AddItem "Bangladesh"
.AddItem "Barbados"
.AddItem "Belarus"
.AddItem "Belgium"
.AddItem "Belize"
.AddItem "Benin"
.AddItem "Bermuda"
.AddItem "Bhutan"
.AddItem "Bolivia"
.AddItem "Bosnia and Herzegovina"
.AddItem "Botswana"
.AddItem "Bouvet Island"
.AddItem "Brazil"
.AddItem "British Indian Ocean Terri"
.AddItem "Brunei Darussalam"
.AddItem "Bulgaria"
.AddItem "Burkina Faso"
.AddItem "Burundi"
.AddItem "Cambodia"
.AddItem "Cameroon"
.AddItem "Canada"
.AddItem "Cape Verde"
.AddItem "Cayman Islands"
.AddItem "Central African Republic"
.AddItem "Chad"
.AddItem "Chile"
.AddItem "China"
.AddItem "Christmas Island"
.AddItem "Cocos (Keeling) Islands"
.AddItem "Colombia"
.AddItem "Comoros"
.AddItem "CG"
.AddItem "Congo, The Democratic Republic Of The"
.AddItem "Cook Islands"
.AddItem "Costa Rica"
.AddItem "Cote D'Ivoire (Ivory Coast)"
.AddItem "Croatia (Hrvatska)"
.AddItem "Cuba"
.AddItem "Cyprus"
.AddItem "Czech Republic"
.AddItem "Czechoslovakia (former)"
.AddItem "Denmark"
.AddItem "Djibouti"
.AddItem "Dominica"
.AddItem "Dominican Republic"
.AddItem "TEast TimorP"
.AddItem "Ecuador"
.AddItem "Egypt"
.AddItem "El Salvador"
.AddItem "Equatorial Guinea"
.AddItem "Eritrea"
.AddItem "Estonia"
.AddItem "Ethiopia"
.AddItem "Falkland Islands (Malvinas)"
.AddItem "Faroe Islands"
.AddItem "Fiji"
.AddItem "Finland"
.AddItem "France"
.AddItem "French Guiana"
.AddItem "French Polynesia"
.AddItem "French Southern Territories"
.AddItem "Gabon"
.AddItem "Gambia"
.AddItem "Georgia"
.AddItem "Germany"
.AddItem "Ghana"
.AddItem "Gibraltar"
.AddItem "Greece"
.AddItem "Greenland"
.AddItem "Grenada"
.AddItem "Guadeloupe"
.AddItem "Guam"
.AddItem "Guatemala"
.AddItem "Guinea"
.AddItem "Guinea-Bissau"
.AddItem "Guyana"
.AddItem "Haiti"
.AddItem "Heard and McDonal"
.AddItem "Honduras"
.AddItem "Hong Kong"
.AddItem "Hungary"
.AddItem "Iceland"
.AddItem "India"
.AddItem "Indonesia"
.AddItem "Iran"
.AddItem "Iraq"
.AddItem "Ireland"
.AddItem "Israel"
.AddItem "Italy"
.AddItem "Jamaica"
.AddItem "Japan"
.AddItem "Jordan"
.AddItem "Kazakhstan"
.AddItem "Kenya"
.AddItem "Kiribati"
.AddItem "Korea (North)"
.AddItem "Korea (South)"
.AddItem "Kuwait" > Kuwait
.AddItem "Kyrgyzstan"
.AddItem "Laos"
.AddItem "Latvia"
.AddItem "Lebanon"
.AddItem "Lesotho"
.AddItem "Liberia"
.AddItem "Libya"
.AddItem "Liechtenstein"
.AddItem "Lithuania"
.AddItem "Luxembourg"
.AddItem "Macau"
.AddItem "Macedonia"
.AddItem "Madagascar"
.AddItem "Malawi"
.AddItem "Malaysia"
.AddItem "Maldives"
.AddItem "Mali"
.AddItem "Malta"
.AddItem "Marshall Islands"
.AddItem "Martinique"
.AddItem "Mauritania"
.AddItem "Mauritius"
.AddItem "Mayotte"
.AddItem "Mexico"
.AddItem "Micronesia"
.AddItem "Moldova"
.AddItem "Monaco"
.AddItem "Mongolia"
.AddItem "Montserrat"
.AddItem "Morocco"
.AddItem "Mozambique"
.AddItem "Myanmar"
.AddItem "Namibia"
.AddItem "Nauru"
.AddItem "Nepal"
.AddItem "Netherlands"
.AddItem "Netherlands Antilles"
.AddItem "Neutral Zone"
.AddItem "New Caledonia"
.AddItem "New Zealand (Aotearoa)"
.AddItem "Nicaragua"
.AddItem "Niger"
.AddItem "Nigeria"
.AddItem "Niue"
.AddItem "Norfolk Island"
.AddItem "Northern Mariana Islands"
.AddItem "Norway"
.AddItem "Oman"
.AddItem "Pakistan"
.AddItem "Palau"
.AddItem "Palestinian Territory, Occupied"
.AddItem "Panama"
.AddItem "Papua New Guinea"
.AddItem "Paraguay"
.AddItem "Peru" > Peru
.AddItem "Philippines"
.AddItem "Pitcairn"
.AddItem "Poland"
.AddItem "Portugal"
.AddItem "Puerto Rico"
.AddItem "Qatar"
.AddItem "Reunion"
.AddItem "Romania"
.AddItem "Russian Federation"
.AddItem "Rwanda"
.AddItem "S. Georgia and S. Sandwich Isls."
.AddItem "Saint Kitts and Nevis"
.AddItem "Saint Lucia"
.AddItem "Samoa" > Samoa
.AddItem "San Marino"
.AddItem "Sao Tome and Principe"
.AddItem "Saudi Arabia"
.AddItem "Senegal"
.AddItem "Seychelles"
.AddItem "Sierra Leone"
.AddItem "Singapore"
.AddItem "Slovak Republic"
.AddItem "Slovenia" > Slovenia
.AddItem "Solomon Islands"
.AddItem "Somalia"
.AddItem "South Africa"
.AddItem "Spain"
.AddItem "Sri Lanka"
.AddItem "St Vincent and the Grenadines"
.AddItem "St. Helena"
.AddItem "St. Pierre and Miquelon"
.AddItem "Sudan"
.AddItem "Suriname"
.AddItem "Svalbard and Jan Mayen Islands"
.AddItem "Swaziland"
.AddItem "Sweden"
.AddItem "Switzerland"
.AddItem "Syria"
.AddItem "Taiwan"
.AddItem "Tajikistan"
.AddItem "Tanzania"
.AddItem "Thailand"
.AddItem "Togo"
.AddItem "Tokelau"
.AddItem "Tonga"
.AddItem "Trinidad and Tobago"
.AddItem "Tunisia"
.AddItem "Turkey"
.AddItem "Turkmenistan"
.AddItem "Turks and Caicos Islands"
.AddItem "Tuvalu"
.AddItem "US Minor Outlying Islands"
.AddItem "USSR (former)"
.AddItem "Uganda"
.AddItem "Ukraine"
.AddItem "United Arab Emirates"
.AddItem "United Kingdom"
.AddItem "United States"
.AddItem "Uruguay"
.AddItem "Uzbekistan"
.AddItem "Vanuatu"
.AddItem "Vatican City State (Holy See)"
.AddItem "Venezuela"
.AddItem "Viet Nam"
.AddItem "Virgin Islands (British)"
.AddItem "Virgin Islands (U.S.)"
.AddItem "Wallis and Futuna Islands"
.AddItem "Western Sahara"
.AddItem "Yemen"
.AddItem "Yugoslavia"
.AddItem "Zambia"
.AddItem "Zimbabwe"
End With
End Function
Generic use of a list of hard coded countrys. Simply call the funtion call ComboFill(combobox name Comments
No comments yet — be the first to post one!
Post a Comment